diff options
| -rw-r--r-- | lisp/startup.el | 4 |
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 |