Fix "Invalid time zone specification" error
* lisp/org.el (org-timestamp-change): Correctly handle `encode-time' parameters. Suggested-by: Derek Feichtinger <dfeich@gmail.com> Reported-by: Eric Abrahamsen <eric@ericabrahamsen.net> <http://permalink.gmane.org/gmane.emacs.orgmode/106344>
This commit is contained in:
parent
e3656b6b2e
commit
e0acd8a15a
|
@ -18034,7 +18034,8 @@ When SUPPRESS-TMP-DELAY is non-nil, suppress delays like \"--2d\"."
|
||||||
(setcar (cdr time0) (+ (nth 1 time0)
|
(setcar (cdr time0) (+ (nth 1 time0)
|
||||||
(if (> n 0) (- rem) (- dm rem))))))
|
(if (> n 0) (- rem) (- dm rem))))))
|
||||||
(setq time
|
(setq time
|
||||||
(encode-time (or (car time0) 0)
|
(apply #'encode-time
|
||||||
|
(or (car time0) 0)
|
||||||
(+ (if (eq org-ts-what 'minute) n 0) (nth 1 time0))
|
(+ (if (eq org-ts-what 'minute) n 0) (nth 1 time0))
|
||||||
(+ (if (eq org-ts-what 'hour) n 0) (nth 2 time0))
|
(+ (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 'day) n 0) (nth 3 time0))
|
||||||
|
|
Loading…
Reference in New Issue