Fix calendar-mark-1

* calendar/diary-lib.el (calendar-mark-1): Fix thinko.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e59c3910fd7aad745b764ca354887ad7cf777ec3..8ec822ff9999288a29546124c5161cbe4a292847 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2014-11-23  Leo Liu  <sdl.web@gmail.com>
+
+       * calendar/diary-lib.el (calendar-mark-1): Fix thinko.
+
 2014-11-22  Fabián Ezequiel Gallina  <fgallina@gnu.org>
 
        Set PYTHONUNBUFFERED on shell startup.

diff --git a/lisp/calendar/diary-lib.el b/lisp/calendar/diary-lib.el
index 7b07f4f6814d4782ae50e2e2812735b47dca8e00..128b62980684e7b103162fa7294ba61185d9cfea 100644 (file)
--- a/lisp/calendar/diary-lib.el
+++ b/lisp/calendar/diary-lib.el
@@ -1668,8 +1668,7 @@ COLOR is passed to `calendar-mark-visible-date' as MARK."
                     (setq date (calendar-gregorian-from-absolute
                                 (funcall toabs (list month day y)))))
                    (calendar-mark-visible-date date color)))))
-      (calendar-mark-complex month day year
-                             'calendar-bahai-from-absolute color))))
+      (calendar-mark-complex month day year fromabs color))))
 
 
 (defun diary-entry-time (s)