From 6dbf95e5b3cf85fce57a5cdd67e7e50b8acb8787 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Fri, 11 Mar 2011 15:05:31 +0100 Subject: [PATCH] Backport 2011-03-11T00:33:57Z!lekktu@gmail.com from trunk. * lisp/help-fns.el (describe-variable): Don't complete keywords. --- lisp/ChangeLog | 6 ++++++ lisp/help-fns.el | 7 ++++--- 2 files changed, 10 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 6685e355360..d84f98a1322 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2011-03-11 Juanma Barranquero + + Backport revno:103622 from trunk. + * help-fns.el (describe-variable): Don't complete keywords. + Suggested by Teodor Zlatanov . + 2011-03-11 Eli Zaretskii * files.el (file-ownership-preserved-p): Pass `integer' as an diff --git a/lisp/help-fns.el b/lisp/help-fns.el index ba8565f5e1e..e0cfb7039f9 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -585,9 +585,10 @@ it is displayed along with the global value." "Describe variable (default %s): " v) "Describe variable: ") obarray - '(lambda (vv) - (or (boundp vv) - (get vv 'variable-documentation))) + (lambda (vv) + (and (not (keywordp vv)) + (or (boundp vv) + (get vv 'variable-documentation)))) t nil nil (if (symbolp v) (symbol-name v)))) (list (if (equal val "") -- 2.39.2