From d33b3958453161f3d0586ad65a1d53873dfa9439 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 7 Feb 1994 20:55:00 +0000 Subject: [PATCH] (calendar-print-mayan-date): Use new error arg to calendar-cursor-to-date. --- lisp/calendar/cal-mayan.el | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/lisp/calendar/cal-mayan.el b/lisp/calendar/cal-mayan.el index 25e3c7dc2cb..ab605f3ab4a 100644 --- a/lisp/calendar/cal-mayan.el +++ b/lisp/calendar/cal-mayan.el @@ -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 ;; Edward M. Reingold @@ -345,9 +345,7 @@ Defaults to today's date if DATE is not given." "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." -- 2.39.5