[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org a6c882949e: Merge branch 'bugfix'
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org a6c882949e: Merge branch 'bugfix' |
Date: |
Tue, 24 Jan 2023 13:58:18 -0500 (EST) |
branch: externals/org
commit a6c882949ef9cdf5a0077a524d3f951a21543a78
Merge: 7ad7796546 20ee7b85eb
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>
Merge branch 'bugfix'
---
lisp/org-agenda.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index bfc3902fdc..4396efe81f 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -3482,7 +3482,9 @@ This ensures the export commands can easily use it."
(when (setq tmp (plist-get props 'day))
(when (integerp tmp) (setq tmp (calendar-gregorian-from-absolute tmp)))
(let ((calendar-date-display-form
- '(year "-" (string-pad month 2 ?0 'left) "-" (string-pad day 2 ?0
'left))))
+ '((format "%s-%.2d-%.2d" year
+ (string-to-number month)
+ (string-to-number day)))))
(setq tmp (calendar-date-string tmp)))
(setq props (plist-put props 'day tmp))
(setq props (plist-put props 'agenda-day tmp)))