Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-17 10:27:41 +00:00
Code Issues Projects Releases Packages Wiki Activity

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

Browse source 
* lisp/calendar/holidays.el (holiday-available-holyday-lists):
Give holiday-lists a better name.
This commit is contained in:
Lars Ingebrigtsen 2022-04-27 15:30:25 +02:00
parent 7933775a1b
commit 0beb8fd663
1 changed files with 6 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
lisp/calendar/holidays.el
View file

@ -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")