[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[O] Add number of items in the lists

From: Sebastien Vauban
Subject: [O] Add number of items in the lists
Date: Mon, 01 Oct 2012 23:46:40 +0200
User-agent: Gnus/5.130006 (Ma Gnus v0.6) Emacs/24.1 (windows-nt)


Here a first patch to do the above announced thing. Surely, this should be
extended to more types of lists, but I first wait for comments...

>From 49e516a175e658469088181bb0c364136198360e Mon Sep 17 00:00:00 2001
From: Sebastien Vauban <address@hidden>
Date: Mon, 1 Oct 2012 23:43:43 +0200
Subject: [PATCH 3/3] Add number of items in the TODO lists

* org-agenda.el (org-todo-list): Add the number of items in the lists.

 lisp/org-agenda.el |    2 ++
 1 files changed, 2 insertions(+), 0 deletions(-)

diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 99bbe6a..992d7f1 100755
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -4423,6 +4423,8 @@ for a keyword.  A numeric prefix directly selects the Nth 
keyword in
       (when rtnall
        (insert (org-agenda-finalize-entries rtnall) "\n"))
       (goto-char (point-min))
+      (end-of-line)
+      (insert (format " (%s)" (length rtnall)))
       (or org-agenda-multi (org-agenda-fit-window-to-buffer))
       (add-text-properties (point-min) (point-max)
                           `(org-agenda-type todo

Best regards,

Sebastien Vauban

reply via email to

[Prev in Thread] Current Thread [Next in Thread]