Update zone-nyan package

This commit is contained in:
Gergely Polonkai 2016-10-14 19:01:08 +02:00
parent e2f9416bde
commit 3e2daeaea5
4 changed files with 14 additions and 8 deletions

View File

@ -1,2 +0,0 @@
;;; -*- no-byte-compile: t -*-
(define-package "zone-nyan" "20160928.2303" "Zone out with nyan cat" '((esxml "0.3.1")) :url "https://github.com/wasamasa/zone-nyan" :keywords '("zone"))

View File

@ -3,8 +3,8 @@
;;; Code:
(add-to-list 'load-path (directory-file-name (or (file-name-directory #$) (car load-path))))
;;;### (autoloads nil "zone-nyan" "zone-nyan.el" (22514 17651 220674
;;;;;; 148000))
;;;### (autoloads nil "zone-nyan" "zone-nyan.el" (22529 3780 596675
;;;;;; 963000))
;;; Generated autoloads from zone-nyan.el
(autoload 'zone-nyan "zone-nyan" "\

View File

@ -0,0 +1,2 @@
;;; -*- no-byte-compile: t -*-
(define-package "zone-nyan" "20161014.154" "Zone out with nyan cat" '((esxml "0.3.1")) :url "https://github.com/wasamasa/zone-nyan" :keywords '("zone"))

View File

@ -4,7 +4,7 @@
;; Author: Vasilij Schneidermann <v.schneidermann@gmail.com>
;; URL: https://github.com/wasamasa/zone-nyan
;; Package-Version: 20160928.2303
;; Package-Version: 20161014.154
;; Version: 0.2.2
;; Package-Requires: ((esxml "0.3.1"))
;; Keywords: zone
@ -744,13 +744,17 @@ It fires every 100ms.")
(defvar zone-nyan-progress 0
"Holds the current progress of the timer.")
(defun zone-nyan-report-progress ()
"Report current nyan progress."
(message "You've nyaned for %.1f seconds"
(/ zone-nyan-progress 10.0)))
(defun zone-nyan-progress ()
"Progress function.
It informs the user just how many seconds they've wasted on
watching nyan cat run."
(unless zone-nyan-hide-progress
(message "You've nyaned for %.1f seconds"
(/ zone-nyan-progress 10.0)))
(zone-nyan-report-progress))
(setq zone-nyan-progress (1+ zone-nyan-progress)))
;;;###autoload
@ -785,7 +789,9 @@ watching nyan cat run."
(when zone-nyan-bg-music-process
(delete-process zone-nyan-bg-music-process))
(when zone-nyan-progress-timer
(cancel-timer zone-nyan-progress-timer)))))
(cancel-timer zone-nyan-progress-timer)
(when zone-nyan-hide-progress
(zone-nyan-report-progress))))))
;;;###autoload
(defun zone-nyan-preview ()