Rename holiday-lists to holiday-available-holyday-lists

* lisp/calendar/holidays.el (holiday-available-holyday-lists):
Give holiday-lists a better name.

diff --git a/lisp/calendar/holidays.el b/lisp/calendar/holidays.el
index ca7166c371a2d307cbc6bdc97c50555876e26d26..89f8219edcb8d09f8ba4bcae3fccb46d924fb0dd 100644 (file)
--- a/lisp/calendar/holidays.el
+++ b/lisp/calendar/holidays.el
@@ -400,7 +400,7 @@ This function is suitable for execution in an init file."
            (displayed-year (calendar-extract-year date)))
       (calendar-list-holidays))))
 
-(defun holiday-lists ()
+(defun holiday-available-holyday-lists ()
   "Return a list of all holiday lists.
 This is used by `list-holidays', and you can customize the return
 value by using `add-function'."
@@ -453,9 +453,10 @@ of a holiday list.
 
 The optional LABEL is used to label the buffer created.
 
-The list of holiday lists is computed by the `holiday-lists', and
-you can alter the results by redefining that function, or use
-`add-function' to all values."
+The list of holiday lists is computed by the
+`holiday-available-holyday-lists' and you can alter the results
+by redefining that function, or use `add-function' to all
+values."
   (interactive
    (let* ((start-year (calendar-read-sexp
                        "Starting year of holidays (>0)"
@@ -467,7 +468,7 @@ you can alter the results by redefining that function, or use
                      start-year
                      start-year))
           (completion-ignore-case t)
-          (lists (holiday-lists))
+          (lists (holiday-available-holyday-lists))
           (choice (capitalize
                    (completing-read "List (TAB for choices): " lists nil t)))
           (which (if (string-equal choice "Ask")