From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 26 Apr 1997 22:14:21 +0000 (+0000)
Subject: (calendar-print-coptic-date): Label Coptic/Ethiopic date in echo area.
X-Git-Tag: emacs-20.1~2374
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ed8fcefb1455cfa801164aee165e0e7dc1419ef0;p=emacs.git

(calendar-print-coptic-date): Label Coptic/Ethiopic date in echo area.
---

diff --git a/lisp/calendar/cal-coptic.el b/lisp/calendar/cal-coptic.el
index 2bdf1295442..ad260067211 100644
--- a/lisp/calendar/cal-coptic.el
+++ b/lisp/calendar/cal-coptic.el
@@ -126,7 +126,7 @@ Defaults to today's date if DATE is not given."
   (let ((f (calendar-coptic-date-string (calendar-cursor-to-date t))))
     (if (string-equal f "")
         (message "Date is pre-%s calendar" coptic-name)
-      (message f))))
+      (message "%s date: %s" coptic-name f))))
 
 (defun calendar-goto-coptic-date (date &optional noecho)
   "Move cursor to Coptic date DATE.