# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1206416487 0
# Node ID 63a7509590a71592eba301c8b50d01dcd176221c
# Parent  6f66ef366e358aa96d961a31b2bf66740ef03359
(calendar-islamic-read-date): New name for
calendar-islamic-prompt-for-date.  Update callers.  Doc fix.

diff -r 6f66ef366e35 -r 63a7509590a7 lisp/calendar/cal-islam.el
--- a/lisp/calendar/cal-islam.el	Tue Mar 25 03:41:14 2008 +0000
+++ b/lisp/calendar/cal-islam.el	Tue Mar 25 03:41:27 2008 +0000
@@ -141,8 +141,9 @@
         (message "Date is pre-Islamic")
       (message "Islamic date (until sunset): %s" i))))
 
-(defun calendar-islamic-prompt-for-date ()
-  "Ask for an Islamic date."
+(defun calendar-islamic-read-date ()
+  "Interactively read the arguments for an Islamic date command.
+Reads a year, month, and day."
   (let* ((today (calendar-current-date))
          (year (calendar-read
                 "Islamic calendar year (>0): "
@@ -168,7 +169,7 @@
 ;;;###cal-autoload
 (defun calendar-goto-islamic-date (date &optional noecho)
   "Move cursor to Islamic DATE; echo Islamic date unless NOECHO is non-nil."
-  (interactive (calendar-islamic-prompt-for-date))
+  (interactive (calendar-islamic-read-date))
   (calendar-goto-date (calendar-gregorian-from-absolute
                        (calendar-absolute-from-islamic date)))
   (or noecho (calendar-print-islamic-date)))