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 82a9094fbad..17b77adf752 100644 --- a/lisp/startup.el +++ b/lisp/startup.el | |||
| @@ -415,8 +415,8 @@ specified by the LC_ALL, LC_CTYPE and LANG environment variables.") | |||
| 415 | ((or (string-equal argi "-u") | 415 | ((or (string-equal argi "-u") |
| 416 | (string-equal argi "-user")) | 416 | (string-equal argi "-user")) |
| 417 | (or argval | 417 | (or argval |
| 418 | (setq argval (car args) | 418 | (setq args (cdr args) |
| 419 | args (cdr args))) | 419 | argval (car args))) |
| 420 | (setq init-file-user argval | 420 | (setq init-file-user argval |
| 421 | argval nil | 421 | argval nil |
| 422 | args (cdr args))) | 422 | args (cdr args))) |