1 files changed, 15 insertions, 15 deletions
diff --git a/init.el b/init.el
index 76a0df2..938c960 100644
--- a/init.el
+++ b/init.el
@@ -1000,21 +1000,21 @@
 ;; Update agenda periodically every `mm/refresh-agenda-time-seconds' seconds.
 ;; This was taken from https://emacs.stackexchange.com/a/68767/38877
-(defvar mm/refresh-agenda-time-seconds 15)
+;; (defvar mm/refresh-agenda-time-seconds 15)
-(defvar mm/refresh-agenda-timer nil
+;; (defvar mm/refresh-agenda-timer nil
-  "Timer for `mm/refresh-agenda-timer-function' to reschedule itself, or NIL.")
+  ;; "Timer for `mm/refresh-agenda-timer-function' to reschedule itself, or NIL.")
-(defun mm/refresh-agenda-timer-function ()
+;; (defun mm/refresh-agenda-timer-function ()
-  "If the user types a command while `mm/refresh-agenda-timer' is active, the next time this function is called from it's main idle timer, deactivate `mm/refresh-agenda-timer'."
+  ;; "If the user types a command while `mm/refresh-agenda-timer' is active, the next time this function is called from it's main idle timer, deactivate `mm/refresh-agenda-timer'."
-  (when mm/refresh-agenda-timer
+  ;; (when mm/refresh-agenda-timer
-    (cancel-timer mm/refresh-agenda-timer))
+    ;; (cancel-timer mm/refresh-agenda-timer))
-  ;;(lambda () (save-window-excursion (org-agenda nil "a")))
+  ;; (lambda () (save-window-excursion (org-agenda nil "a")))
-  (save-window-excursion (org-agenda nil "a"))
+  ;; (save-window-excursion (org-agenda nil "a"))
-  (setq mm/refresh-agenda-timer
+  ;; (setq mm/refresh-agenda-timer
-        (run-with-idle-timer
+        ;; (run-with-idle-timer
-         (time-add (current-idle-time) mm/refresh-agenda-time-seconds)
+         ;; (time-add (current-idle-time) mm/refresh-agenda-time-seconds)
-         nil
+         ;; nil
-         'mm/refresh-agenda-timer-function)))
+         ;; 'mm/refresh-agenda-timer-function)))
-(run-with-idle-timer mm/refresh-agenda-time-seconds t 'mm/refresh-agenda-timer-function)
+;; (run-with-idle-timer mm/refresh-agenda-time-seconds t 'mm/refresh-agenda-timer-function)

diff --git a/init.el b/init.el index 76a0df2..938c960 100644 --- a/init.el +++ b/init.el
@@ -1000,21 +1000,21 @@
1000		1000
1001	;; Update agenda periodically every `mm/refresh-agenda-time-seconds' seconds.	1001	;; Update agenda periodically every `mm/refresh-agenda-time-seconds' seconds.
1002	;; This was taken from https://emacs.stackexchange.com/a/68767/38877	1002	;; This was taken from https://emacs.stackexchange.com/a/68767/38877
1003	(defvar mm/refresh-agenda-time-seconds 15)	1003	;; (defvar mm/refresh-agenda-time-seconds 15)
1004	(defvar mm/refresh-agenda-timer nil	1004	;; (defvar mm/refresh-agenda-timer nil
1005	"Timer for `mm/refresh-agenda-timer-function' to reschedule itself, or NIL.")	1005	;; "Timer for `mm/refresh-agenda-timer-function' to reschedule itself, or NIL.")
1006	(defun mm/refresh-agenda-timer-function ()	1006	;; (defun mm/refresh-agenda-timer-function ()
1007	"If the user types a command while `mm/refresh-agenda-timer' is active, the next time this function is called from it's main idle timer, deactivate `mm/refresh-agenda-timer'."	1007	;; "If the user types a command while `mm/refresh-agenda-timer' is active, the next time this function is called from it's main idle timer, deactivate `mm/refresh-agenda-timer'."
1008	(when mm/refresh-agenda-timer	1008	;; (when mm/refresh-agenda-timer
1009	(cancel-timer mm/refresh-agenda-timer))	1009	;; (cancel-timer mm/refresh-agenda-timer))
1010	;;(lambda () (save-window-excursion (org-agenda nil "a")))	1010	;; (lambda () (save-window-excursion (org-agenda nil "a")))
1011	(save-window-excursion (org-agenda nil "a"))	1011	;; (save-window-excursion (org-agenda nil "a"))
1012	(setq mm/refresh-agenda-timer	1012	;; (setq mm/refresh-agenda-timer
1013	(run-with-idle-timer	1013	;; (run-with-idle-timer
1014	(time-add (current-idle-time) mm/refresh-agenda-time-seconds)	1014	;; (time-add (current-idle-time) mm/refresh-agenda-time-seconds)
1015	nil	1015	;; nil
1016	'mm/refresh-agenda-timer-function)))	1016	;; 'mm/refresh-agenda-timer-function)))
1017	(run-with-idle-timer mm/refresh-agenda-time-seconds t 'mm/refresh-agenda-timer-function)	1017	;; (run-with-idle-timer mm/refresh-agenda-time-seconds t 'mm/refresh-agenda-timer-function)
1018		1018
1019		1019
1020		1020