From f674d9acf54225df8018fed2b3a658b71673763b Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Mon, 17 Nov 1997 01:58:42 +0000 Subject: [PATCH] (list-hebrew-diary-entries): Add the diary entry "specifier" to the entry on the list. --- lisp/calendar/cal-hebrew.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/calendar/cal-hebrew.el b/lisp/calendar/cal-hebrew.el index 79bbd956474..a8a0d6ad1df 100644 --- a/lisp/calendar/cal-hebrew.el +++ b/lisp/calendar/cal-hebrew.el @@ -568,7 +568,10 @@ not be marked in the calendar. This function is provided for use with the (backward-char 1) (subst-char-in-region date-start (point) ?\^M ?\n t) (add-to-diary-list - gdate (buffer-substring entry-start (point))))))) + gdate + (buffer-substring-no-properties entry-start (point)) + (buffer-substring-no-properties + (1+ date-start) (1- entry-start))))))) (setq d (cdr d)))) (setq gdate (calendar-gregorian-from-absolute -- 2.39.2