# HG changeset patch # User Richard M. Stallman # Date 760654500 0 # Node ID 5391898ea85ccedaaca8f0131f9479c5d4044863 # Parent 10ea561bcaa5e4da81532e90ba13afc562e84bf4 (calendar-print-mayan-date): Use new error arg to calendar-cursor-to-date. diff -r 10ea561bcaa5 -r 5391898ea85c lisp/calendar/cal-mayan.el --- 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 ;; Edward M. Reingold @@ -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."