summaryrefslogtreecommitdiff
path: root/lisp/calendar/cal-coptic.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1997-04-26 22:14:21 +0000
committerRichard M. Stallman <rms@gnu.org>1997-04-26 22:14:21 +0000
commited8fcefb1455cfa801164aee165e0e7dc1419ef0 (patch)
tree34b0d500f3ec2046489b3fc46c073cdf5447fcef /lisp/calendar/cal-coptic.el
parent42f5d1b0010da0ba3b29ac48e6139d563d6301ec (diff)
downloademacs-ed8fcefb1455cfa801164aee165e0e7dc1419ef0.tar.gz
(calendar-print-coptic-date): Label Coptic/Ethiopic date in echo area.
Diffstat (limited to 'lisp/calendar/cal-coptic.el')
-rw-r--r--lisp/calendar/cal-coptic.el2
1 files changed, 1 insertions, 1 deletions
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.