diff options
author | Bastien Guerry <bzg@altern.org> | 2011-03-06 18:12:35 +0100 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2011-03-06 18:12:35 +0100 |
commit | ef549e08918a45c2721cf16533082dde6773e466 (patch) | |
tree | fdd55834ee61c39bf372c428df91062be0a36edc | |
parent | 25dfaf717c07d00a6fe4ad55546c76fd7d726d5f (diff) | |
download | org-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.el | 6 |
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))) |