Browse Source

Fix all todo line bug in org-mobile.el

Carsten Dominik 15 years ago
parent
commit
c0c56217ff
2 changed files with 6 additions and 0 deletions
  1. 5 0
      lisp/ChangeLog
  2. 1 0
      lisp/org-agenda.el

+ 5 - 0
lisp/ChangeLog

@@ -1,3 +1,8 @@
+2009-10-16  Carsten Dominik  <carsten.dominik@gmail.com>
+
+	* org-agenda.el (org-agenda-list): Mark the all-todo items line as
+	a header line.
+
 2009-10-15  Carsten Dominik  <carsten.dominik@gmail.com>
 
 	* org-exp.el (org-inlinetask-remove-END-maybe): Declare function.

+ 1 - 0
lisp/org-agenda.el

@@ -3017,6 +3017,7 @@ given in `org-agenda-start-on-weekday'."
 	(add-text-properties (point-min) (1- (point))
 			     (list 'face 'org-agenda-structure
 				   'short-heading "All TODO items"))
+	(org-agenda-mark-header-line (point-min))
 	(insert (org-finalize-agenda-entries rtnall) "\n")))
     (unless org-agenda-compact-blocks
       (let* ((d1 (car day-numbers))