From edb7e341d110f4f695ecde9cd620cad80d28f1d8 Mon Sep 17 00:00:00 2001 From: Madan Ramakrishnan Date: Mon, 16 Apr 2012 07:29:49 +0000 Subject: [PATCH] org-agenda.el: Fix `org-agenda-bulk-toggle'. * org-agenda.el (org-agenda-bulk-mark): Truly make arg optional as advertised by the function. Problem here was that `org-agenda-bulk-toggle' calls `org-agenda-bulk-mark' with no parameters; however, the (max arg 1) call inside `org-agenda-bulk-mark' will fail with no parameter. TINYCHANGE --- lisp/org-agenda.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 3bb0fc848..ddb56ca4b 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -8294,7 +8294,7 @@ This is a command that has to be installed in `calendar-mode-map'." (defun org-agenda-bulk-mark (&optional arg) "Mark the entry at point for future bulk action." (interactive "p") - (dotimes (i (max arg 1)) + (dotimes (i (or arg 1)) (unless (org-get-at-bol 'org-agenda-diary-link) (let* ((m (org-get-at-bol 'org-hd-marker)) ov)