aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/help-fns.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 59eedb5331d..cc00c722ccc 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -944,7 +944,7 @@ it is displayed along with the global value."
944 (unless (buffer-live-p buffer) (setq buffer (current-buffer))) 944 (unless (buffer-live-p buffer) (setq buffer (current-buffer)))
945 (unless (frame-live-p frame) (setq frame (selected-frame))) 945 (unless (frame-live-p frame) (setq frame (selected-frame)))
946 (if (not (symbolp variable)) 946 (if (not (symbolp variable))
947 (message "You did not specify a variable") 947 (user-error "You didn't specify a variable")
948 (save-excursion 948 (save-excursion
949 (let ((valvoid (not (with-current-buffer buffer (boundp variable)))) 949 (let ((valvoid (not (with-current-buffer buffer (boundp variable))))
950 val val-start-pos locus) 950 val val-start-pos locus)
@@ -1435,7 +1435,7 @@ current buffer and the selected frame, respectively."
1435 t nil nil 1435 t nil nil
1436 (if found (symbol-name v-or-f))))) 1436 (if found (symbol-name v-or-f)))))
1437 (list (if (equal val "") 1437 (list (if (equal val "")
1438 v-or-f (intern val))))) 1438 (or v-or-f "") (intern val)))))
1439 (if (not (symbolp symbol)) 1439 (if (not (symbolp symbol))
1440 (user-error "You didn't specify a function or variable")) 1440 (user-error "You didn't specify a function or variable"))
1441 (unless (buffer-live-p buffer) (setq buffer (current-buffer))) 1441 (unless (buffer-live-p buffer) (setq buffer (current-buffer)))