tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

org-agenda.el: Fix the display of the number of commands for block agendas 

* org-agenda.el (org-agenda-get-restriction-and-command): Fix
the display of the number of commands for block agendas.

Thanks to Sébastien Vauban for reporting this.
This commit is contained in:
Bastien Guerry 2012-09-18 09:09:41 +02:00
parent 6cc7ff1092
commit a82797356c
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/org-agenda.el
View File

@ -2675,13 +2675,12 @@ L Timeline for current buffer # List stuck projects (!=configure)
((stringp match)
(setq match (copy-sequence match))
(org-add-props match nil 'face 'org-warning))
(match
(format "set of %d commands" (length match)))
(t ""))))
((listp type)
(format "set of %d commands" (length type))))))
(if (org-string-nw-p match)
(add-text-properties
0 (length line) (list 'help-echo
(concat "Matcher: "match)) line)))
(concat "Matcher: " match)) line)))
(push line lines)))
(setq lines (nreverse lines))
(when prefixes