diff options
Diffstat (limited to 'lisp/help-fns.el')
| -rw-r--r-- | lisp/help-fns.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el index 931e8af4df0..80f30e88fa4 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -383,9 +383,13 @@ suitable file is found, return nil." (help--docstring-quote (format-kbd-macro real-def)))) (t "[Missing arglist. Please make a bug report.]"))) + ;; Insert "`X", not "(\` X)", when documenting `X. + (use1 (replace-regexp-in-string + "\\`(\\\\=\\\\\\\\=` \\([^\n ]*\\))\\'" + "\\\\=`\\1" use t)) (high (if raw - (cons use doc) - (help-highlight-arguments (substitute-command-keys use) + (cons use1 doc) + (help-highlight-arguments (substitute-command-keys use1) (substitute-command-keys doc))))) (let ((fill-begin (point)) (high-usage (car high)) |