ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

org-effectiveness.el (org-effectiveness-plot): fix change of year 

* org-effectiveness.el (org-effectiveness-plot): fix change of year
This commit is contained in:
David Arroyo Menendez 2014-04-22 03:56:56 +02:00
parent 903bf2b12c
commit a61417f541
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
contrib/lisp/org-effectiveness.el
View File

@ -156,7 +156,7 @@ many TODO pending"
(let ((month startmonth)
(year startyear)
(str ""))
(while (and (>= endyear year) (>= endmonth month))
(while (or (> endyear year) (and (= endyear year) (>= endmonth month)))
(setq str (concat str (number-to-string year) "-" (org-effectiveness-month-to-string month) " " (org-effectiveness-in-date (concat (number-to-string year) "-" (org-effectiveness-month-to-string month)) 1) "\n"))
(if (= month 12)
(progn