|
@@ -9941,8 +9941,15 @@ The prefix arg is passed through to the command if possible."
|
|
|
nil nil nil
|
|
nil nil nil
|
|
|
(if (eq action ?s) "(Re)Schedule to" "(Re)Set Deadline to")
|
|
(if (eq action ?s) "(Re)Schedule to" "(Re)Set Deadline to")
|
|
|
org-overriding-default-time)))
|
|
org-overriding-default-time)))
|
|
|
- (c1 (if (eq action ?s) 'org-agenda-schedule 'org-agenda-deadline)))
|
|
|
|
|
- (setq cmd `(eval '(,c1 arg ,time)))))
|
|
|
|
|
|
|
+ (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.
|
|
|
|
|
+ (setq cmd `(eval '(let ((org-log-reschedule
|
|
|
|
|
+ (and org-log-reschedule 'time)))
|
|
|
|
|
+ (,c1 arg ,time))))))
|
|
|
|
|
|
|
|
((equal action ?S)
|
|
((equal action ?S)
|
|
|
(if (not (org-agenda-check-type nil 'agenda 'timeline 'todo))
|
|
(if (not (org-agenda-check-type nil 'agenda 'timeline 'todo))
|
Nicolas Goaziou