From 7e5965372d4c5877909dcb29e6e19209ddba4611 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Sat, 24 May 2014 14:12:56 +0200 Subject: [PATCH] org-timer.el (org-timer-value-string): Always return a positive value * org-timer.el (org-timer-value-string): Always return a positive value. Add docstring. --- lisp/org-timer.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/org-timer.el b/lisp/org-timer.el index 1a86ffa74..8161699f3 100644 --- a/lisp/org-timer.el +++ b/lisp/org-timer.el @@ -186,7 +186,10 @@ it in the buffer." (insert (org-timer-value-string)))) (defun org-timer-value-string () - (format org-timer-format (org-timer-secs-to-hms (floor (org-timer-seconds))))) + "Set the timer string." + (format org-timer-format + (org-timer-secs-to-hms + (abs (floor (org-timer-seconds)))))) (defvar org-timer-timer-is-countdown nil) (defun org-timer-seconds ()