diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-11-13 23:58:38 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-11-13 23:58:38 +0100 |
commit | 3c49de4380bd981a5b99328cf02ff93e2aaf3923 (patch) | |
tree | c74c6226d5b3425129506818952896fbe07e91e5 | |
parent | 403249a6ab1bfe4b8ed5ffb8c75535d3d56ca699 (diff) | |
download | org-mode-3c49de4380bd981a5b99328cf02ff93e2aaf3923.tar.gz |
org-timer: Use lexical binding
* lisp/org-timer.el (org-timer-set-timer): Silence byte-compiler.
-rw-r--r-- | lisp/org-timer.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/org-timer.el b/lisp/org-timer.el index 0758ed2..6da0bf6 100644 --- a/lisp/org-timer.el +++ b/lisp/org-timer.el @@ -1,4 +1,4 @@ -;;; org-timer.el --- Timer code for Org mode +;;; org-timer.el --- Timer code for Org mode -*- lexical-binding: t; -*- ;; Copyright (C) 2008-2015 Free Software Foundation, Inc. @@ -447,8 +447,7 @@ using three `C-u' prefix arguments." (setq minutes (concat minutes ":00"))) (if (not (string-match "[0-9]+" minutes)) (org-timer-show-remaining-time) - (let ((secs (org-timer-hms-to-secs (org-timer-fix-incomplete minutes))) - (hl (org-timer--get-timer-title))) + (let ((secs (org-timer-hms-to-secs (org-timer-fix-incomplete minutes)))) (if (and org-timer-countdown-timer (not (or (equal opt '(16)) (y-or-n-p "Replace current timer? ")))) |