summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien Guerry <bzg@altern.org>2011-03-06 18:12:35 +0100
committerBastien Guerry <bzg@altern.org>2011-03-06 18:12:35 +0100
commitef549e08918a45c2721cf16533082dde6773e466 (patch)
treefdd55834ee61c39bf372c428df91062be0a36edc
parent25dfaf717c07d00a6fe4ad55546c76fd7d726d5f (diff)
downloadorg-mode-ef549e08918a45c2721cf16533082dde6773e466.tar.gz
org-agenda.el: Rename org-run-agenda-series to org-agenda-run-series.
* org-agenda.el (org-agenda-run-series): Rename from `org-run-agenda-series'.
-rw-r--r--lisp/org-agenda.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 5026664..5010eb0 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -2223,7 +2223,7 @@ Pressing `<' twice means to restrict to the current subtree or region
((fboundp type)
(org-let lprops '(funcall type match)))
(t (error "Invalid custom agenda command type %s" type))))
- (org-run-agenda-series (nth 1 entry) (cddr entry))))
+ (org-agenda-run-series (nth 1 entry) (cddr entry))))
((equal keys "C")
(setq org-agenda-custom-commands org-agenda-custom-commands-orig)
(customize-variable 'org-agenda-custom-commands))
@@ -2473,10 +2473,10 @@ s Search for keywords C Configure custom agenda commands
(defvar org-agenda-overriding-arguments nil) ; dynamically scoped parameter
(defvar org-agenda-last-arguments nil
"The arguments of the previous call to `org-agenda'.")
-(defun org-run-agenda-series (name series)
+(defun org-agenda-run-series (name series)
(org-let (nth 1 series) '(org-prepare-agenda name))
(let* ((org-agenda-multi t)
- (redo (list 'org-run-agenda-series name (list 'quote series)))
+ (redo (list 'org-agenda-run-series name (list 'quote series)))
(org-agenda-overriding-arguments
(or org-agenda-overriding-arguments
(unless (null (delq nil (get 'org-agenda-redo-command 'last-args)))