|
@@ -7322,7 +7322,7 @@ Negative selection means regexp must not match for selection of an entry."
|
|
|
(move-beginning-of-line 1)))))
|
|
(move-beginning-of-line 1)))))
|
|
|
|
|
|
|
|
(defun org-agenda-later (arg)
|
|
(defun org-agenda-later (arg)
|
|
|
- "Go forward in time by thee current span.
|
|
|
|
|
|
|
+ "Go forward in time by the current span.
|
|
|
With prefix ARG, go forward that many times the current span."
|
|
With prefix ARG, go forward that many times the current span."
|
|
|
(interactive "p")
|
|
(interactive "p")
|
|
|
(org-agenda-check-type t 'agenda)
|
|
(org-agenda-check-type t 'agenda)
|
|
@@ -7334,7 +7334,7 @@ With prefix ARG, go forward that many times the current span."
|
|
|
greg2)
|
|
greg2)
|
|
|
(cond
|
|
(cond
|
|
|
((numberp span)
|
|
((numberp span)
|
|
|
- (setq sd (+ span sd)))
|
|
|
|
|
|
|
+ (setq sd (+ (* span arg) sd)))
|
|
|
((eq span 'day)
|
|
((eq span 'day)
|
|
|
(setq sd (+ arg sd)))
|
|
(setq sd (+ arg sd)))
|
|
|
((eq span 'week)
|
|
((eq span 'week)
|
Nicolas Goaziou