diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-11-14 00:03:51 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-11-14 00:03:51 +0100 |
commit | 8bbb789757d6f8c1ac0778f908a2cd2f238cd42f (patch) | |
tree | 56e3621883b10f9c55145e861cdf18e2706f10d8 | |
parent | 3090bb29c8ff9e5f656f8d6ccc60c70bb511ffe4 (diff) | |
download | org-mode-8bbb789757d6f8c1ac0778f908a2cd2f238cd42f.tar.gz |
org-habit: Use lexical binding
* lisp/org-habit.el (org-habit-insert-consistency-graphs): Silence
byte-compiler.
-rw-r--r-- | lisp/org-habit.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/org-habit.el b/lisp/org-habit.el index 69d1912..991162e 100644 --- a/lisp/org-habit.el +++ b/lisp/org-habit.el @@ -1,4 +1,4 @@ -;;; org-habit.el --- The habit tracking code for Org-mode +;;; org-habit.el --- The habit tracking code for Org -*- lexical-binding: t; -*- ;; Copyright (C) 2009-2015 Free Software Foundation, Inc. @@ -286,7 +286,6 @@ Habits are assigned colors on the following basis: schedule's repeat period." (let* ((scheduled (or scheduled-days (org-habit-scheduled habit))) (s-repeat (org-habit-scheduled-repeat habit)) - (scheduled-end (+ scheduled (1- s-repeat))) (d-repeat (org-habit-deadline-repeat habit)) (deadline (if scheduled-days (+ scheduled-days (- d-repeat s-repeat)) @@ -386,7 +385,7 @@ current time." (defun org-habit-insert-consistency-graphs (&optional line) "Insert consistency graph for any habitual tasks." - (let ((inhibit-read-only t) l c + (let ((inhibit-read-only t) (buffer-invisibility-spec '(org-link)) (moment (time-subtract (current-time) (list 0 (* 3600 org-extend-today-until) 0)))) |