From 8fa0d7ee8445bb58f8ec3eaa94d95c0ce32bb53f Mon Sep 17 00:00:00 2001 From: Michael Olson Date: Wed, 29 Nov 2006 14:41:57 +0000 Subject: [PATCH] Fix XEmacs note publishing bug 2006-11-29 Michael Olson * planner-publish.el (planner-publish-note-tag): Don't call planner-replace-regexp-in-string if either the text or the regexp are empty strings. This should fix a bug with note publishing that XEmacs users were experiencing. Thanks to Cumhur Erkut for the report. git-archimport-id: mwolson@gnu.org--2006-planner-el/planner-el--devel--0--patch-96 --- ChangeLog | 8 ++++++++ planner-publish.el | 5 +++-- 2 files changed, 11 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index fa42aa8..f6c1a45 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,11 @@ +2006-11-29 Michael Olson + + * planner-publish.el (planner-publish-note-tag): Don't call + planner-replace-regexp-in-string if either the text or the regexp + are empty strings. This should fix a bug with note publishing + that XEmacs users were experiencing. Thanks to Cumhur Erkut for + the report. + 2006-11-04 John Sullivan * planner-el.texi (PSVN): Document all options and dependencies. diff --git a/planner-publish.el b/planner-publish.el index 26dac4d..bea4109 100644 --- a/planner-publish.el +++ b/planner-publish.el @@ -656,8 +656,9 @@ DIRECTORY and START." (insert link) (planner-insert-markup (muse-markup-text 'planner-end-note-link)) ;; remove link item from categories to avoid duplicates - (setq categories (planner-replace-regexp-in-string (regexp-quote link) - categories "" t t)) + (unless (or (string= link "") (string= categories "")) + (setq categories (planner-replace-regexp-in-string + (regexp-quote link) "" categories t t))) (planner-insert-markup (muse-markup-text 'planner-begin-note-categories)) (insert categories) (planner-insert-markup (muse-markup-text 'planner-end-note-categories)) -- 2.11.4.GIT