# HG changeset patch # User Jim Blandy # Date 738336141 0 # Node ID a655e32e62701fbcb1dd9fc32f8f9695f69c665e # Parent 68de05fb57519f1cf90b4360880f437643c2c964 * 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. diff -r 68de05fb5751 -r a655e32e6270 lisp/startup.el --- 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")