diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c86360fd0..2775042ed 100755
--- a/lisp/ChangeLog
+++ b/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.
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index a8f082688..ac79e4784 100644
--- a/lisp/org-agenda.el
+++ b/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))