From 02555387011c0d10575a425132525c78c1ac459d Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Fri, 12 May 2017 00:39:06 +0200 Subject: [PATCH] org-agenda: Fix logging with bulk-deadlining * lisp/org-agenda.el (org-agenda-bulk-action): Do not request logging writing a note when multiple entries are being re-deadline'd at the same time. Reported-by: Allen Li --- lisp/org-agenda.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index adf32c59a..8737340dd 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -9969,11 +9969,13 @@ The prefix arg is passed through to the command if possible." (c1 (if (eq action ?s) 'org-agenda-schedule 'org-agenda-deadline))) ;; Make sure to not prompt for a note when bulk - ;; rescheduling as Org cannot cope with simultaneous Org. - ;; Besides, it could be annoying depending on the number - ;; of items re-scheduled. + ;; rescheduling as Org cannot cope with simultaneous + ;; notes. Besides, it could be annoying depending on the + ;; number of items re-scheduled. (setq cmd `(eval '(let ((org-log-reschedule - (and org-log-reschedule 'time))) + (and org-log-reschedule 'time)) + (org-log-redeadline + (and org-log-redeadline 'time))) (,c1 arg ,time)))))) ((equal action ?S)