浏览代码

org-agenda: Fix `org-batch-agenda'

* lisp/org-agenda.el (org-batch-agenda): Fix function when CMD-KEY is
  a string of length 2.

Reported-by: Christoph Gaitzsch <privat@christophgaitzsch.de>
<http://permalink.gmane.org/gmane.emacs.orgmode/102724>
Nicolas Goaziou 9 年之前
父节点
当前提交
10173ad6d6
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      lisp/org-agenda.el

+ 1 - 1
lisp/org-agenda.el

@@ -3159,7 +3159,7 @@ Parameters are alternating variable names and values that will be bound
 before running the agenda command."
 before running the agenda command."
   (org-eval-in-environment (org-make-parameter-alist parameters)
   (org-eval-in-environment (org-make-parameter-alist parameters)
     (let (org-agenda-sticky)
     (let (org-agenda-sticky)
-      (if (> (length cmd-key) 2)
+      (if (> (length cmd-key) 1)
 	  (org-tags-view nil cmd-key)
 	  (org-tags-view nil cmd-key)
 	(org-agenda nil cmd-key))))
 	(org-agenda nil cmd-key))))
   (set-buffer org-agenda-buffer-name)
   (set-buffer org-agenda-buffer-name)