diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 79434bd..60805cf 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -3385,7 +3385,7 @@ date.  It also removes lines that contain only whitespace."
     (re-search-forward "\n=+$" nil t)
     (delete-region (point-min) (min (point-max) (1+ (match-end 0)))))
   (goto-char (point-min))
-  (while (re-search-forward "^ +\n" nil t)
+  (while (re-search-forward "^ .*\n" nil t)
     (replace-match ""))
   (goto-char (point-min))
   (if (re-search-forward "^Org-mode dummy\n?" nil t)