# HG changeset patch # User Glenn Morris # Date 1206416474 0 # Node ID 6f66ef366e358aa96d961a31b2bf66740ef03359 # Parent 6011e8a7280f6b3fa3764d64d12dbb8d707c3c19 (calendar-hebrew-read-date): New name for calendar-hebrew-prompt-for-date. Update callers. Doc fix. diff -r 6011e8a7280f -r 6f66ef366e35 lisp/calendar/cal-hebrew.el --- a/lisp/calendar/cal-hebrew.el Tue Mar 25 03:40:53 2008 +0000 +++ b/lisp/calendar/cal-hebrew.el Tue Mar 25 03:41:14 2008 +0000 @@ -216,8 +216,9 @@ (t (calendar-absolute-from-hebrew (list death-month death-day year)))))) -(defun calendar-hebrew-prompt-for-date () - "Ask for a Hebrew date." +(defun calendar-hebrew-read-date () + "Interactively read the arguments for a Hebrew date command. +Reads a year, month, and day." (let* ((today (calendar-current-date)) (year (calendar-read "Hebrew calendar year (>3760): " @@ -261,7 +262,7 @@ ;;;###cal-autoload (defun calendar-goto-hebrew-date (date &optional noecho) "Move cursor to Hebrew DATE; echo Hebrew date unless NOECHO is non-nil." - (interactive (calendar-hebrew-prompt-for-date)) + (interactive (calendar-hebrew-read-date)) (calendar-goto-date (calendar-gregorian-from-absolute (calendar-absolute-from-hebrew date))) (or noecho (calendar-print-hebrew-date)))