aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuri Linkov2013-05-06 23:23:40 +0300
committerJuri Linkov2013-05-06 23:23:40 +0300
commit32985194f2370621bc2178f94d6cae0cf01d1702 (patch)
treedfb5e8e7f81e46b9464d804bb042a59bdd3ec5bb
parenta1c700dec5a6b0db88d57087c5a7e43e30b1fc00 (diff)
downloademacs-32985194f2370621bc2178f94d6cae0cf01d1702.tar.gz
emacs-32985194f2370621bc2178f94d6cae0cf01d1702.zip
* lisp/emacs-lisp/lisp-mode.el (eval-defun-2): Doc fix.
(eval-defun-2, eval-defun, eval-last-sexp, eval-last-sexp-1): Doc fix. (emacs-lisp-mode-map): Replace "minibuffer" with "echo area" in the help string. (Bug#12985) Fixes: debbugs:14344
-rw-r--r--lisp/ChangeLog8
-rw-r--r--lisp/emacs-lisp/lisp-mode.el13
2 files changed, 14 insertions, 7 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2e5bc6063cd..d700b53f3a2 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
12013-05-06 Juri Linkov <juri@jurta.org>
2
3 * emacs-lisp/lisp-mode.el (eval-defun-2): Doc fix. (Bug#14344)
4 (eval-defun-2, eval-defun, eval-last-sexp, eval-last-sexp-1):
5 Doc fix.
6 (emacs-lisp-mode-map): Replace "minibuffer" with "echo area"
7 in the help string. (Bug#12985)
8
12013-05-06 Kelly Dean <kellydeanch@yahoo.com> (tiny change) 92013-05-06 Kelly Dean <kellydeanch@yahoo.com> (tiny change)
2 10
3 * simple.el (shell-command-on-region): Doc fix. (Bug#14279) 11 * simple.el (shell-command-on-region): Doc fix. (Bug#14279)
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index b528dd11316..8d74afac285 100644
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -394,7 +394,7 @@ font-lock keywords will not be case sensitive."
394 :enable mark-active)) 394 :enable mark-active))
395 (bindings--define-key menu-map [eval-sexp] 395 (bindings--define-key menu-map [eval-sexp]
396 '(menu-item "Evaluate Last S-expression" eval-last-sexp 396 '(menu-item "Evaluate Last S-expression" eval-last-sexp
397 :help "Evaluate sexp before point; print value in minibuffer")) 397 :help "Evaluate sexp before point; print value in echo area"))
398 (bindings--define-key menu-map [separator-format] menu-bar-separator) 398 (bindings--define-key menu-map [separator-format] menu-bar-separator)
399 (bindings--define-key menu-map [comment-region] 399 (bindings--define-key menu-map [comment-region]
400 '(menu-item "Comment Out Region" comment-region 400 '(menu-item "Comment Out Region" comment-region
@@ -772,7 +772,7 @@ If CHAR is not a character, return nil."
772 772
773 773
774(defun eval-last-sexp-1 (eval-last-sexp-arg-internal) 774(defun eval-last-sexp-1 (eval-last-sexp-arg-internal)
775 "Evaluate sexp before point; print value in minibuffer. 775 "Evaluate sexp before point; print value in the echo area.
776With argument, print output into current buffer." 776With argument, print output into current buffer."
777 (let ((standard-output (if eval-last-sexp-arg-internal (current-buffer) t))) 777 (let ((standard-output (if eval-last-sexp-arg-internal (current-buffer) t)))
778 ;; Setup the lexical environment if lexical-binding is enabled. 778 ;; Setup the lexical environment if lexical-binding is enabled.
@@ -825,7 +825,7 @@ POS specifies the starting position where EXP was found and defaults to point."
825 `(progn ,@(mapcar (lambda (v) `(defvar ,v)) vars) ,exp))))) 825 `(progn ,@(mapcar (lambda (v) `(defvar ,v)) vars) ,exp)))))
826 826
827(defun eval-last-sexp (eval-last-sexp-arg-internal) 827(defun eval-last-sexp (eval-last-sexp-arg-internal)
828 "Evaluate sexp before point; print value in minibuffer. 828 "Evaluate sexp before point; print value in the echo area.
829Interactively, with prefix argument, print output into current buffer. 829Interactively, with prefix argument, print output into current buffer.
830Truncates long output according to the value of the variables 830Truncates long output according to the value of the variables
831`eval-expression-print-length' and `eval-expression-print-level'. 831`eval-expression-print-length' and `eval-expression-print-level'.
@@ -891,14 +891,13 @@ Reinitialize the face according to the `defface' specification."
891 891
892(defun eval-defun-2 () 892(defun eval-defun-2 ()
893 "Evaluate defun that point is in or before. 893 "Evaluate defun that point is in or before.
894The value is displayed in the minibuffer. 894The value is displayed in the echo area.
895If the current defun is actually a call to `defvar', 895If the current defun is actually a call to `defvar',
896then reset the variable using the initial value expression 896then reset the variable using the initial value expression
897even if the variable already has some other value. 897even if the variable already has some other value.
898\(Normally `defvar' does not change the variable's value 898\(Normally `defvar' does not change the variable's value
899if it already has a value.\) 899if it already has a value.\)
900 900
901With argument, insert value in current buffer after the defun.
902Return the result of evaluation." 901Return the result of evaluation."
903 ;; FIXME: the print-length/level bindings should only be applied while 902 ;; FIXME: the print-length/level bindings should only be applied while
904 ;; printing, not while evaluating. 903 ;; printing, not while evaluating.
@@ -950,11 +949,11 @@ this command arranges for all errors to enter the debugger.
950With a prefix argument, instrument the code for Edebug. 949With a prefix argument, instrument the code for Edebug.
951 950
952If acting on a `defun' for FUNCTION, and the function was 951If acting on a `defun' for FUNCTION, and the function was
953instrumented, `Edebug: FUNCTION' is printed in the minibuffer. If not 952instrumented, `Edebug: FUNCTION' is printed in the echo area. If not
954instrumented, just FUNCTION is printed. 953instrumented, just FUNCTION is printed.
955 954
956If not acting on a `defun', the result of evaluation is displayed in 955If not acting on a `defun', the result of evaluation is displayed in
957the minibuffer. This display is controlled by the variables 956the echo area. This display is controlled by the variables
958`eval-expression-print-length' and `eval-expression-print-level', 957`eval-expression-print-length' and `eval-expression-print-level',
959which see." 958which see."
960 (interactive "P") 959 (interactive "P")