aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/startup.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/startup.el b/lisp/startup.el
index 398e97a465a..7561d231a58 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -446,8 +446,6 @@ this prefix to create a unique file name.")
446 (setq default-frame-alist 446 (setq default-frame-alist
447 (cons '(icon-type . t) default-frame-alist)) 447 (cons '(icon-type . t) default-frame-alist))
448 (setq args (cdr args))) 448 (setq args (cdr args)))
449 ((and (not (equal "" argi)) (aref argi 0))
450 (error "Unknown option `%s'" argi))
451 (t (setq done t))) 449 (t (setq done t)))
452 ;; Was argval set but not used? 450 ;; Was argval set but not used?
453 (and argval 451 (and argval
@@ -794,6 +792,8 @@ Type \\[describe-distribution] for information on getting the latest version."))
794 (if (not did-hook) 792 (if (not did-hook)
795 ;; Ok, presume that the argument is a file name 793 ;; Ok, presume that the argument is a file name
796 (progn 794 (progn
795 (if (string-match "\\`-" argi)
796 (error "Unknown option `%s'" argi))
797 (setq file-count (1+ file-count)) 797 (setq file-count (1+ file-count))
798 (cond ((= file-count 1) 798 (cond ((= file-count 1)
799 (setq first-file-buffer 799 (setq first-file-buffer