mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-20 18:17:20 +00:00
Code Issues Releases Activity

Rename set-woman-file-regexp to woman-set-file-regexp

Browse Source 
* lisp/woman.el (woman-set-file-regexp): Rename from
'set-woman-file-regexp'.  Retain old name as an obsolete alias.
This commit is contained in:
Stefan Kangas 2022-08-04 11:27:47 +02:00
parent bde0ccd2c2
commit 27b60ae061
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lisp/woman.el
View File

@ -781,7 +781,7 @@ Built automatically from the customizable user options
(defvar woman-uncompressed-file-regexp) ; for the compiler
(defvar woman-file-compression-regexp) ; for the compiler
(defun set-woman-file-regexp (symbol value)
(defun woman-set-file-regexp (symbol value)
"Bind SYMBOL to VALUE and set `woman-file-regexp' as per user customizations.
Used as :set cookie by Customize when customizing the user options
`woman-uncompressed-file-regexp' and `woman-file-compression-regexp'."
@ -806,7 +806,7 @@ in the ncurses package include `toe.1m', `form.3x', etc.
Note: an optional compression regexp will be appended, so this regexp
MUST NOT end with any kind of string terminator such as $ or \\\\='."
:type 'regexp
:set #'set-woman-file-regexp
:set #'woman-set-file-regexp
:group 'woman-interface)
(defcustom woman-file-compression-regexp
@ -822,7 +822,7 @@ Should begin with \\. and end with \\\\=' and MUST NOT be optional."
;; not loaded by default!
:version "24.1" ; added xz
:type 'regexp
:set #'set-woman-file-regexp
:set #'woman-set-file-regexp
:group 'woman-interface)
(defcustom woman-use-own-frame nil
@ -4580,11 +4580,11 @@ logging the message."
(put 'woman-bookmark-jump 'bookmark-handler-type "WoMan")
;; Obsolete.
(defvar woman-version "0.551 (beta)" "WoMan version information.")
(make-obsolete-variable 'woman-version 'emacs-version "28.1")
(define-obsolete-function-alias 'set-woman-file-regexp 'woman-set-file-regexp "29.1")
(provide 'woman)
;;; woman.el ends here