[Emacs-diffs] master 6515049: Fix org-timestamp-change typo

[Paul Eggert]

branch: master
commit 65150493f7e3f0768fccd6097c6dafc9ae18770b
Author: Paul Eggert <address@hidden>
Commit: Paul Eggert <address@hidden>

    Fix org-timestamp-change typo
    
    Problem reported by Peter Münster (Bug#23299).
    * lisp/org/org.el (org-timestamp-change): Fix typo that relied
    on undocumented behavior in ‘encode-time’.  In practice the
    old code used local time, so use that.
---
 lisp/org/org.el |    3 +--
 1 files changed, 1 insertions(+), 2 deletions(-)

diff --git a/lisp/org/org.el b/lisp/org/org.el
index 3abf627..b0e1e20 100644
--- a/lisp/org/org.el
+++ b/lisp/org/org.el
@@ -17459,8 +17459,7 @@ When SUPPRESS-TMP-DELAY is non-nil, suppress delays 
like \"--2d\"."
                         (+ (if (eq org-ts-what 'hour) n 0)   (nth 2 time0))
                         (+ (if (eq org-ts-what 'day) n 0)    (nth 3 time0))
                         (+ (if (eq org-ts-what 'month) n 0)  (nth 4 time0))
-                        (+ (if (eq org-ts-what 'year) n 0)   (nth 5 time0))
-                        (nthcdr 6 time0)))
+                        (+ (if (eq org-ts-what 'year) n 0)   (nth 5 time0))))
       (when (and (member org-ts-what '(hour minute))
                 extra
                 (string-match "-\\([012][0-9]\\):\\([0-5][0-9]\\)" extra))