diff options
author | Stefan Kangas <stefan@marxist.se> | 2022-08-04 11:27:47 +0200 |
---|---|---|
committer | Stefan Kangas <stefan@marxist.se> | 2022-08-04 11:34:35 +0200 |
commit | 27b60ae061423c836d06a7a6349c6ab4397b2b41 (patch) | |
tree | 32cb3cad3faa1e5519e085aeb4557c0b4da6ded1 /lisp/woman.el | |
parent | bde0ccd2c2d29b818e27d90888da9e3cb36712aa (diff) | |
download | emacs-27b60ae061423c836d06a7a6349c6ab4397b2b41.tar.gz emacs-27b60ae061423c836d06a7a6349c6ab4397b2b41.tar.bz2 emacs-27b60ae061423c836d06a7a6349c6ab4397b2b41.zip |
Rename set-woman-file-regexp to woman-set-file-regexp
* lisp/woman.el (woman-set-file-regexp): Rename from
'set-woman-file-regexp'. Retain old name as an obsolete alias.
Diffstat (limited to 'lisp/woman.el')
-rw-r--r-- | lisp/woman.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/woman.el b/lisp/woman.el index d8743c7face..23ce2218b52 100644 --- a/lisp/woman.el +++ b/lisp/woman.el @@ -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 |