Mercurial > emacs
changeset 3072:a655e32e6270
* startup.el (command-line-1): Don't handle `-i'. We're
abandoning the `insert file' meaning in favor of the `use a
bitmapped icon' meaning.
| author | Jim Blandy <jimb@redhat.com> |
|---|---|
| date | Tue, 25 May 1993 13:22:21 +0000 |
| parents | 68de05fb5751 |
| children | 905f9fda79b8 |
| files | lisp/startup.el |
| diffstat | 1 files changed, 2 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/startup.el Tue May 25 13:19:28 1993 +0000 +++ b/lisp/startup.el Tue May 25 13:22:21 1993 +0000 @@ -47,7 +47,6 @@ ; -funcall function same ; -l file load file ; -load file same -; -i file insert file into buffer ; -insert file same ; file visit file ; -kill kill (exit) emacs @@ -371,10 +370,9 @@ (setq file (expand-file-name file))) (load file nil t)) (setq command-line-args-left (cdr command-line-args-left))) - ((or (string-equal argi "-i") - (string-equal argi "-insert")) + ((string-equal argi "-insert") (or (stringp (car command-line-args-left)) - (error "filename omitted from `-i' option")) + (error "filename omitted from `-insert' option")) (insert-file-contents (car command-line-args-left)) (setq command-line-args-left (cdr command-line-args-left))) ((string-equal argi "-kill")