diff lisp/startup.el @ 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.

--- 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")