Fixed unknown variable in `org-timestamp-change'.
`org-time-stamp-rounding-minutes-when-changing' was renamed to `org-time-stamp-rounding-minutes'. Require 'cl at run-time, because of explicit calls to `signum'.
This commit is contained in:
parent
c5662d689a
commit
2f8bf4cb63
4
org.el
4
org.el
|
@ -66,8 +66,8 @@
|
||||||
|
|
||||||
;;;; Require other packages
|
;;;; Require other packages
|
||||||
|
|
||||||
(eval-when-compile
|
|
||||||
(require 'cl)
|
(require 'cl)
|
||||||
|
(eval-when-compile
|
||||||
(require 'gnus-sum)
|
(require 'gnus-sum)
|
||||||
(require 'calendar))
|
(require 'calendar))
|
||||||
;; For XEmacs, noutline is not yet provided by outline.el, so arrange for
|
;; For XEmacs, noutline is not yet provided by outline.el, so arrange for
|
||||||
|
@ -18534,7 +18534,7 @@ The date will be changed by N times WHAT. WHAT can be `day', `month',
|
||||||
in the timestamp determines what will be changed."
|
in the timestamp determines what will be changed."
|
||||||
(let ((pos (point))
|
(let ((pos (point))
|
||||||
with-hm inactive
|
with-hm inactive
|
||||||
(dm (max (nth 1 org-time-stamp-rounding-minutes-when-changing) 1))
|
(dm (max (nth 1 org-time-stamp-rounding-minutes) 1))
|
||||||
org-ts-what
|
org-ts-what
|
||||||
extra rem
|
extra rem
|
||||||
ts time time0)
|
ts time time0)
|
||||||
|
|
Loading…
Reference in New Issue