From 9d00dd4a88bb98e8666c8e5a5744a9b9ef17309a Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Sat, 13 Oct 2012 12:52:43 +0200 Subject: [PATCH] org-agenda: Fix `org-agenda-later' when called with an argument * lisp/org-agenda.el (org-agenda-later): Fix function when span is a number and an argument was provided. Also fix typo in docstring. --- lisp/org-agenda.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 39b22cf43..bb9901b0b 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -7276,7 +7276,7 @@ Negative selection means regexp must not match for selection of an entry." (move-beginning-of-line 1))))) (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." (interactive "p") (org-agenda-check-type t 'agenda) @@ -7288,7 +7288,7 @@ With prefix ARG, go forward that many times the current span." greg2) (cond ((numberp span) - (setq sd (+ span sd))) + (setq sd (+ (* span arg) sd))) ((eq span 'day) (setq sd (+ arg sd))) ((eq span 'week)