diff lisp/startup.el @ 748:4714ad36583c

*** empty log message ***

--- a/lisp/startup.el	Tue Jul 07 17:57:20 1992 +0000
+++ b/lisp/startup.el	Tue Jul 07 18:36:02 1992 +0000
@@ -338,6 +338,8 @@
 		 (setq command-line-args-left (cdr command-line-args-left)))
 		((or (string-equal argi "-i")
 		     (string-equal argi "-insert"))
+		 (or (stringp (car command-line-args-left))
+		     (error "filename omitted from `-i' option"))
 		 (insert-file-contents (car command-line-args-left))
 		 (setq command-line-args-left (cdr command-line-args-left)))
 		((string-equal argi "-kill")