Mercurial > emacs
changeset 13072:c5e3d029241d
(command-line-1): --eval: Don't print the value.
| author | Erik Naggum <erik@naggum.no> |
|---|---|
| date | Mon, 25 Sep 1995 10:56:15 +0000 |
| parents | 2e514396cbc8 |
| children | 840a4e0ec0a6 |
| files | lisp/startup.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/startup.el Sun Sep 24 23:33:06 1995 +0000 +++ b/lisp/startup.el Mon Sep 25 10:56:15 1995 +0000 @@ -101,8 +101,8 @@ ;; --funcall FUNC and should not be used. (It's a typo ;; -e FUNC promoted to a feature.) ;; -;; -eval FORM Execute Emacs lisp form FORM, and print -;; --eval FORM the value it returns. +;; -eval FORM Execute Emacs lisp form FORM. +;; --eval FORM ;; ;; -insert FILE Insert the contents of FILE into buffer. ;; --insert FILE @@ -725,7 +725,7 @@ (setq tem argval) (setq tem (car command-line-args-left)) (setq command-line-args-left (cdr command-line-args-left))) - (print (eval (read tem)))) + (eval (read tem))) ;; Set the default directory as specified in -L. ((or (string-equal argi "-L") (string-equal argi "-directory"))