Преглед изворни кода

org-timer: Use lexical binding

* lisp/org-timer.el (org-timer-set-timer): Silence byte-compiler.
Nicolas Goaziou пре 9 година
родитељ
комит
3c49de4380
1 измењених фајлова са 2 додато и 3 уклоњено
  1. 2 3
      lisp/org-timer.el

+ 2 - 3
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? "))))