Mercurial > emacs

changeset 13285:7ccba52e1e3e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix menu for Chinese calendar.
author Edward M. Reingold <reingold@emr.cs.iit.edu>
date Tue, 24 Oct 1995 15:50:05 +0000
parents 7b2bfa585697
children b4d36420c837
files lisp/calendar/cal-menu.el
diffstat 1 files changed, 5 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calendar/cal-menu.el	Tue Oct 24 15:49:00 1995 +0000
+++ b/lisp/calendar/cal-menu.el	Tue Oct 24 15:50:05 1995 +0000
@@ -396,12 +396,11 @@
             (let ((i (calendar-islamic-date-string date)))
               (if (not (string-equal i ""))
                   (list (list (format "Islamic date (before sunset): %s" i)))))
-;      too slow to leave this in all the time!
-;       (list
-;        (list (format "Chinese date: %s" (calendar-chinese-date-string date))))
-;       so instead,
-            (list '("Chinese date (select to echo Chinese date)"
-                    . calendar-mouse-chinese-date))
+            (list
+             (list (format "Chinese date: %s"
+                           (calendar-chinese-date-string date))))
+;            (list '("Chinese date (select to echo Chinese date)"
+;                    . calendar-mouse-chinese-date))
             (let ((c (calendar-coptic-date-string date)))
               (if (not (string-equal c ""))
                   (list (list (format "Coptic date: %s" c)))))