changeset 20267:6a9f60f7e241

(list-hebrew-diary-entries): Add the diary entry "specifier" to the entry on the list.
author Karl Heuer <kwzh@gnu.org>
date Mon, 17 Nov 1997 01:58:42 +0000
parents 450fdcb00733
children 02add8c7a9c6
files lisp/calendar/cal-hebrew.el
diffstat 1 files changed, 4 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calendar/cal-hebrew.el	Mon Nov 17 01:56:15 1997 +0000
+++ b/lisp/calendar/cal-hebrew.el	Mon Nov 17 01:58:42 1997 +0000
@@ -568,7 +568,10 @@
                        (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