[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Orgmode] Fix for org-agenda-cleanup-fancy-diary
From: |
Erik Hetzner |
Subject: |
[Orgmode] Fix for org-agenda-cleanup-fancy-diary |
Date: |
Tue, 31 Mar 2009 13:28:41 -0700 |
User-agent: |
Wanderlust/2.15.6 (Almost Unreal) SEMI/1.14.6 (Maruoka) FLIM/1.14.9 (Gojō) APEL/10.7 Emacs/22.2 (i486-pc-linux-gnu) MULE/5.0 (SAKAKI) |
Hi all -
Thanks for the software. I am finally sending in this patch, as I have
gotten tired of patching with each release!
This fixes a problem I have with diary entries displaying very long
information in my schedule. I have diary entries imported from ical
format which have multiple paragraphs of descriptive information.
Of course, perhaps there are people who want the long display, so
maybe it should be an option?
best,
Erik Hetzner
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)
;; Erik Hetzner, California Digital Library
;; gnupg key id: 1024D/01DB07E3
pgprJA34cIlIH.pgp
Description: PGP signature
- [Orgmode] Fix for org-agenda-cleanup-fancy-diary,
Erik Hetzner <=