aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMichael Albinus2025-04-22 08:45:34 +0200
committerMichael Albinus2025-04-22 08:45:34 +0200
commitfc5e905dc90e21b1a381bde42e22c06f45c17e16 (patch)
treef101833adfcc5204cacf4ce84a90142846c147a6
parent45e849bddc1c7777628d3f42557ddbd8a6ba96b7 (diff)
downloademacs-fc5e905dc90e21b1a381bde42e22c06f45c17e16.tar.gz
emacs-fc5e905dc90e21b1a381bde42e22c06f45c17e16.zip
Make `man' more portable
* lisp/man.el (Man-init-defvars): Use [:cntrl:]. Character ranges with octal numbers aren't portable enough. (Bug#77944)
-rw-r--r--lisp/man.el6
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/man.el b/lisp/man.el
index d34d9154052..397162a7ad1 100644
--- a/lisp/man.el
+++ b/lisp/man.el
@@ -635,9 +635,7 @@ This is necessary if one wants to dump man.el with Emacs."
635 (if Man-sed-script 635 (if Man-sed-script
636 (concat "-e '" Man-sed-script "'") 636 (concat "-e '" Man-sed-script "'")
637 "") 637 "")
638 ;; Use octal numbers. Otherwise, \032 (Ctrl-Z) would 638 "-e '/^[[:cntrl:]][[:cntrl:]]*$/d'"
639 ;; suspend remote connections.
640 "-e '/^[\\o001-\\o032][\\o001-\\o032]*$/d'"
641 "-e '/\e[789]/s///g'" 639 "-e '/\e[789]/s///g'"
642 "-e '/Reformatting page. Wait/d'" 640 "-e '/Reformatting page. Wait/d'"
643 "-e '/Reformatting entry. Wait/d'" 641 "-e '/Reformatting entry. Wait/d'"
@@ -772,7 +770,7 @@ Different man programs support this feature in different ways.
772The default Debian man program (\"man-db\") has a `--local-file' 770The default Debian man program (\"man-db\") has a `--local-file'
773\(or `-l') option for this purpose. The default Red Hat man 771\(or `-l') option for this purpose. The default Red Hat man
774program has no such option, but interprets any name containing 772program has no such option, but interprets any name containing
775a \"/\" as a local filename. The function returns either `man-db' 773a \"/\" as a local filename. The function returns either `man-db',
776`man', or nil." 774`man', or nil."
777 (if (eq Man-support-local-filenames 'auto-detect) 775 (if (eq Man-support-local-filenames 'auto-detect)
778 (with-connection-local-variables 776 (with-connection-local-variables