emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Orgmode] [PATCH 2/2] set variables org-timer-timer[123] correctly


From: Carsten Dominik
Subject: Re: [Orgmode] [PATCH 2/2] set variables org-timer-timer[123] correctly
Date: Thu, 5 Nov 2009 16:12:23 +0100

Applied, thanks.

- Carsten

On Nov 5, 2009, at 10:57 AM, Stephan Schmitt wrote:

before these variables were set to nil, and consequently
org-timer-last-timer as well.
---
lisp/org-timer.el |   12 ++++++------
1 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/lisp/org-timer.el b/lisp/org-timer.el
index 8a59c74..660312a 100644
--- a/lisp/org-timer.el
+++ b/lisp/org-timer.el
@@ -312,12 +312,12 @@ VALUE can be `on', `off', or `pause'."
                (t (error "Not in an Org buffer"))))
           timer-set)
      (mapcar (lambda(timer)
-               (if (not (or (eval timer) timer-set))
-                   (setq timer-set t
-                         timer
-                         (run-with-timer
-                          secs nil 'org-notify (format "%s: time out" hl) t)
-                         org-timer-last-timer timer)))
+               (when (not (or (eval timer) timer-set))
+                 (setq timer-set t)
+                 (setq org-timer-last-timer
+                       (run-with-timer
+                       secs nil 'org-notify (format "%s: time out" hl) t))
+                 (set timer org-timer-last-timer)))
              '(org-timer-timer1
                org-timer-timer2
                org-timer-timer3)))))
--
1.6.4.4



_______________________________________________
Emacs-orgmode mailing list
Remember: use `Reply All' to send replies to the list.
address@hidden
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

- Carsten







reply via email to

[Prev in Thread] Current Thread [Next in Thread]