From 6e584d06fdc076c9128266bcc7ed37dab3902d27 Mon Sep 17 00:00:00 2001 From: Marco Wahl Date: Wed, 26 Sep 2018 14:15:34 +0200 Subject: [PATCH] org: Show planning type in prompt when editing * lisp/org.el (org-add-planning-info): Call `org-read-date' with either DEADLINE or SCHEDULED as value for the prompt. --- lisp/org.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/org.el b/lisp/org.el index ebe928bcc..89e16f75b 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -13051,7 +13051,11 @@ WHAT entry will also be removed." (org-read-date-analyze time default-time (decode-time default-time))) ;; If necessary, get the time from the user - (or time (org-read-date nil 'to-time nil nil + (or time (org-read-date nil 'to-time nil + (cl-case what + (deadline "DEADLINE") + (scheduled "SCHEDULED") + (otherwise nil)) default-time default-input))))) (org-with-wide-buffer