فهرست منبع

org-agenda: Fix scheduled repeats

* lisp/org-agenda.el (org-agenda-get-scheduled): Fix scheduled
  repeats.

This is a follow-up to b5c19643d2347e4e1f4d76634b458380a46e39c4.
Nicolas Goaziou 9 سال پیش
والد
کامیت
00f95cb126
1فایلهای تغییر یافته به همراه1 افزوده شده و 1 حذف شده
  1. 1 1
      lisp/org-agenda.el

+ 1 - 1
lisp/org-agenda.el

@@ -6214,7 +6214,7 @@ scheduled items with an hour specification like [h]h:mm."
 		     (pcase-let ((`(,first ,past) org-agenda-scheduled-leaders))
 		     (pcase-let ((`(,first ,past) org-agenda-scheduled-leaders))
 		       ;; Show a reminder of a past scheduled today.
 		       ;; Show a reminder of a past scheduled today.
 		       (if (and todayp pastschedp)
 		       (if (and todayp pastschedp)
-			   (format past (1+ diff))
+			   (format past diff)
 			 first))
 			 first))
 		     head level category tags time nil habitp))
 		     head level category tags time nil habitp))
 		   (face (cond ((and (not habitp) pastschedp)
 		   (face (cond ((and (not habitp) pastschedp)