From bfc7bff6f9d115b945a0de2d0b6b81fda2a83e8c Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Mon, 17 Nov 1997 01:59:00 +0000 Subject: [PATCH] (list-islamic-diary-entries): Add the diary entry "specifier" to the entry on the list. --- lisp/calendar/cal-islam.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/calendar/cal-islam.el b/lisp/calendar/cal-islam.el index 1949a6b48dd..b791524a7ff 100644 --- a/lisp/calendar/cal-islam.el +++ b/lisp/calendar/cal-islam.el @@ -263,7 +263,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