From 6432fcd433896e06bc1d0fefd9115952a9ae8ff7 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Sun, 8 Oct 2017 10:07:36 +0200 Subject: [PATCH] C-c C-c on a planning info timestamp fixes day * lisp/org.el (org-ctrl-c-ctrl-c): On a timestamp in a planning line, fix day, like regular timestamps. Reported-by: Aaron Jensen --- lisp/org.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 3120faebb..41fa685ac 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -20782,8 +20782,8 @@ This command does many different things, depending on context: '(babel-call clock dynamic-block footnote-definition footnote-reference inline-babel-call inline-src-block inlinetask item keyword node-property paragraph - plain-list property-drawer radio-target src-block - statistics-cookie table table-cell table-row + plain-list planning property-drawer radio-target + src-block statistics-cookie table table-cell table-row timestamp) t)) (type (org-element-type context))) @@ -20935,7 +20935,8 @@ Use `\\[org-edit-special]' to edit table.el tables")) (cond (arg (call-interactively #'org-table-recalculate)) ((org-table-maybe-recalculate-line)) (t (org-table-align)))))) - (`timestamp (org-timestamp-change 0 'day)) + ((or `timestamp (and `planning (guard (org-at-timestamp-p 'lax)))) + (org-timestamp-change 0 'day)) ((and `nil (guard (org-at-heading-p))) ;; When point is on an unsupported object type, we can miss ;; the fact that it also is at a heading. Handle it here.