diff options
| author | Bastien Guerry <bzg@altern.org> | 2014-05-24 14:12:56 +0200 |
|---|---|---|
| committer | Bastien Guerry <bzg@altern.org> | 2014-05-24 14:12:56 +0200 |
| commit | 7e5965372d4c5877909dcb29e6e19209ddba4611 (patch) | |
| tree | 4d274ae50af4e009b97d18ac03b9306bb1bee39e | |
| parent | 942a95cd59c18eb3036d393e7759f86670cae507 (diff) | |
| download | org-mode-7e5965372d4c5877909dcb29e6e19209ddba4611.tar.gz | |
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.
| -rw-r--r-- | lisp/org-timer.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/org-timer.el b/lisp/org-timer.el index 1a86ffa..8161699 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 () |