aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/startup.el6
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/startup.el b/lisp/startup.el
index b7552fad26b..fa38680d415 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -47,7 +47,6 @@
47; -funcall function same 47; -funcall function same
48; -l file load file 48; -l file load file
49; -load file same 49; -load file same
50; -i file insert file into buffer
51; -insert file same 50; -insert file same
52; file visit file 51; file visit file
53; -kill kill (exit) emacs 52; -kill kill (exit) emacs
@@ -371,10 +370,9 @@ Type \\[describe-distribution] for information on getting the latest version."))
371 (setq file (expand-file-name file))) 370 (setq file (expand-file-name file)))
372 (load file nil t)) 371 (load file nil t))
373 (setq command-line-args-left (cdr command-line-args-left))) 372 (setq command-line-args-left (cdr command-line-args-left)))
374 ((or (string-equal argi "-i") 373 ((string-equal argi "-insert")
375 (string-equal argi "-insert"))
376 (or (stringp (car command-line-args-left)) 374 (or (stringp (car command-line-args-left))
377 (error "filename omitted from `-i' option")) 375 (error "filename omitted from `-insert' option"))
378 (insert-file-contents (car command-line-args-left)) 376 (insert-file-contents (car command-line-args-left))
379 (setq command-line-args-left (cdr command-line-args-left))) 377 (setq command-line-args-left (cdr command-line-args-left)))
380 ((string-equal argi "-kill") 378 ((string-equal argi "-kill")