diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2015-09-03 15:31:12 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2015-09-03 15:32:54 -0700 |
| commit | 26bd978d87dfbf9baa115cd961a67d42b416c4bf (patch) | |
| tree | 20f3d063895796f54b9f521c0b35f65bbcd418c4 /lisp/woman.el | |
| parent | 944d77f070da388b0c6e6578a9f868e88c088940 (diff) | |
| download | emacs-26bd978d87dfbf9baa115cd961a67d42b416c4bf.tar.gz | |
Fix some more docstring etc. quoting problems
Mostly these fixes prevent the transliteration of apostrophes
that should stay apostrophes. Also, prefer curved quotes in
Bahá’í proper names, as that’s the preferred Bahá’í style and
these names are chock-full of non-ASCII characters anyway.
* lisp/emacs-lisp/eieio-core.el (eieio-defclass-autoload)
(eieio-defclass-internal):
* lisp/emacs-lisp/eieio.el (defclass):
* lisp/hi-lock.el (hi-lock-mode):
Don’t transliterate Lisp apostrophes when generating a
doc string or diagnostic.
* lisp/international/mule-diag.el (list-coding-systems-1):
* lisp/international/ogonek.el (ogonek-jak, ogonek-how):
* lisp/mail/sendmail.el (sendmail-query-user-about-smtp):
* lisp/vc/ediff-mult.el (ediff-redraw-registry-buffer):
* lisp/vc/ediff-ptch.el (ediff-fixup-patch-map):
Substitute quotes before putting them in the help buffer.
Diffstat (limited to 'lisp/woman.el')
| -rw-r--r-- | lisp/woman.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/woman.el b/lisp/woman.el index de2cbc100ea..f2e59e50bca 100644 --- a/lisp/woman.el +++ b/lisp/woman.el @@ -786,7 +786,7 @@ without interactive confirmation, if it exists as a topic." (defvar woman-file-regexp nil "Regexp used to select (possibly compressed) man source files, e.g. -\"\\.\\([0-9lmnt]\\w*\\)\\(\\.\\(g?z\\|bz2\\|xz\\)\\)?\\'\". +\"\\.\\([0-9lmnt]\\w*\\)\\(\\.\\(g?z\\|bz2\\|xz\\)\\)?\\\\='\". Built automatically from the customizable user options `woman-uncompressed-file-regexp' and `woman-file-compression-regexp'.") @@ -816,7 +816,7 @@ becoming more common in the GNU world. For example, the man pages 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 \\'." +MUST NOT end with any kind of string terminator such as $ or \\\\='." :type 'regexp :set 'set-woman-file-regexp :group 'woman-interface) @@ -826,8 +826,8 @@ MUST NOT end with any kind of string terminator such as $ or \\'." "Do not change this unless you are sure you know what you are doing! Regexp used to match compressed man file extensions for which decompressors are available and handled by auto-compression mode, -e.g. \"\\\\.\\\\(g?z\\\\|bz2\\\\|xz\\\\)\\\\'\" for `gzip', `bzip2', or `xz'. -Should begin with \\. and end with \\' and MUST NOT be optional." +e.g. \"\\\\.\\\\(g?z\\\\|bz2\\\\|xz\\\\)\\\\\\='\" for `gzip', `bzip2', or `xz'. +Should begin with \\. and end with \\\\=' and MUST NOT be optional." ;; Should be compatible with car of ;; `jka-compr-file-name-handler-entry', but that is unduly ;; complicated, includes an inappropriate extension (.tgz) and is @@ -3719,7 +3719,7 @@ expression in parentheses. Leaves point after the value." "Find and return start of next control line. PAT, if non-nil, specifies an additional component of the control line regexp to search for, which is appended to the default -regexp, \"\\(\\\\c\\)?\\n[.']\"." +regexp, \"\\(\\\\c\\)?\\n[.\\=']\"." (let ((pattern (concat "\\(\\\\c\\)?\n[.']" pat)) to) (save-excursion @@ -3981,7 +3981,7 @@ Optional argument NUMERIC, if non-nil, means the argument is numeric." (goto-char from))) (defun woman-horizontal-line () - "\\l'Nc' -- Draw a horizontal line of length N using character c, default _." + "\\l\\='Nc\\=' -- Draw a horizontal line of length N using character c, default _." (delete-char -1) (delete-char 1) (looking-at "\\(.\\)\\(.*\\)\\1") |