diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-04-27 14:57:57 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-04-27 14:58:53 +0200 |
commit | 7933775a1b98bd33daa438f13a843eac3326af56 (patch) | |
tree | b2069755f6d2e55a4c18f9c0b3bcc3d5cba853a1 /lisp/ldefs-boot.el | |
parent | da25daf7f74cfab558eb0f796d2fe33e6c4f06dd (diff) | |
download | emacs-7933775a1b98bd33daa438f13a843eac3326af56.tar.gz emacs-7933775a1b98bd33daa438f13a843eac3326af56.tar.bz2 emacs-7933775a1b98bd33daa438f13a843eac3326af56.zip |
Separate out the holiday lists into its own function
* lisp/calendar/holidays.el (holiday-lists): Separated out into
its own function so that it can be altered (bug#55140).
(list-holidays): Use it.
Diffstat (limited to 'lisp/ldefs-boot.el')
-rw-r--r-- | lisp/ldefs-boot.el | 31 |
1 files changed, 23 insertions, 8 deletions
diff --git a/lisp/ldefs-boot.el b/lisp/ldefs-boot.el index 93e8e14d1f0..41a2b920b5f 100644 --- a/lisp/ldefs-boot.el +++ b/lisp/ldefs-boot.el @@ -16110,19 +16110,22 @@ If this produces no string either, return nil." nil nil) (autoload 'display-local-help "help-at-pt" "\ Display local help in the echo area. -This displays a short help message, namely the string produced by -the `kbd-help' property at point. If `kbd-help' does not produce -a string, but the `help-echo' property does, then that string is -printed instead. +This command, by default, displays a short help message, namely +the string produced by the `kbd-help' property at point. If +`kbd-help' does not produce a string, but the `help-echo' +property does, then that string is printed instead. The string is passed through `substitute-command-keys' before it is displayed. -A numeric argument ARG prevents display of a message in case -there is no help. While ARG can be used interactively, it is -mainly meant for use from Lisp. +If INHIBIT-WARNING is non-nil, this prevents display of a message +in case there is no help. -\(fn &optional ARG)" t nil) +If DESCRIBE-BUTTON in non-nil (interactively, the prefix arg), and +there's a button/widget at point, pop a buffer describing that +button/widget instead. + +\(fn &optional INHIBIT-WARNING DESCRIBE-BUTTON)" t nil) (autoload 'help-at-pt-cancel-timer "help-at-pt" "\ Cancel any timer set by `help-at-pt-set-timer'. @@ -17359,6 +17362,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. + \(fn Y1 &optional Y2 L LABEL)" t nil) (defalias 'holiday-list 'list-holidays) @@ -32773,6 +32780,14 @@ Major-mode for writing SRecode macros. ;;;*** +;;;### (autoloads nil "string-edit" "textmodes/string-edit.el" (0 +;;;;;; 0 0 0)) +;;; Generated autoloads from textmodes/string-edit.el + +(register-definition-prefixes "string-edit" '("read-string-from-buffer" "string-edit-")) + +;;;*** + ;;;### (autoloads nil "strokes" "strokes.el" (0 0 0 0)) ;;; Generated autoloads from strokes.el |