Mercurial > emacs
changeset 5834:5391898ea85c
(calendar-print-mayan-date): Use new error arg to calendar-cursor-to-date.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 07 Feb 1994 20:55:00 +0000 |
parents | 10ea561bcaa5 |
children | 1c685c3bd5a9 |
files | lisp/calendar/cal-mayan.el |
diffstat | 1 files changed, 2 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calendar/cal-mayan.el Mon Feb 07 20:53:04 1994 +0000 +++ b/lisp/calendar/cal-mayan.el Mon Feb 07 20:55:00 1994 +0000 @@ -1,6 +1,6 @@ ;;; cal-mayan.el --- calendar functions for the Mayan calendars. -;; Copyright (C) 1992 Free Software Foundation, Inc. +;; Copyright (C) 1992, 1993 Free Software Foundation, Inc. ;; Author: Stewart M. Clamen <clamen@cs.cmu.edu> ;; Edward M. Reingold <reingold@cs.uiuc.edu> @@ -345,9 +345,7 @@ "Show the Mayan long count, tzolkin, and haab equivalents of date." (interactive) (message "Mayan date: %s" - (calendar-mayan-date-string - (or (calendar-cursor-to-date) - (error "Cursor is not on a date!"))))) + (calendar-mayan-date-string (calendar-cursor-to-date t)))) (defun calendar-goto-mayan-long-count-date (date &optional noecho) "Move cursor to Mayan long count DATE. Echo Mayan date unless NOECHO is t."