From d365421f859f6c88e3dc4b610c87adaef3cb099c Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Tue, 27 Jun 2000 10:54:26 +0000 Subject: [PATCH] (describe-variable): Don't insert a second `'s' in front of the string `value is shown below'. Since the syntax-table to emacs-lisp-mode-syntax-table makes forward-sexp skip over an existing `'s', so that this won't be deleted. --- lisp/help.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/help.el b/lisp/help.el index 1a25fe78601..c3dfc518aaf 100644 --- a/lisp/help.el +++ b/lisp/help.el @@ -847,13 +847,16 @@ Returns the documentation as a string, also." (set-buffer standard-output) (if (> (count-lines (point-min) (point-max)) 10) (progn + ;; Note that setting the syntax table like below + ;; makes forward-sexp move over a `'s' at the end + ;; of a symbol. (set-syntax-table emacs-lisp-mode-syntax-table) (goto-char (point-min)) (if valvoid (forward-line 1) (forward-sexp 1) (delete-region (point) (progn (end-of-line) (point))) - (insert "'s value is shown below.\n\n") + (insert " value is shown below.\n\n") (save-excursion (insert "\n\nValue:")))))) (princ "Documentation:") -- 2.39.2