diff options
| -rw-r--r-- | lisp/startup.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/startup.el b/lisp/startup.el index ca71ef43137..8dac582e452 100644 --- a/lisp/startup.el +++ b/lisp/startup.el | |||
| @@ -1635,6 +1635,8 @@ normal otherwise." | |||
| 1635 | (setq file file-ex)) | 1635 | (setq file file-ex)) |
| 1636 | (load file nil t))) | 1636 | (load file nil t))) |
| 1637 | 1637 | ||
| 1638 | ;; This is used to handle -script. It's not clear | ||
| 1639 | ;; we need to document it. | ||
| 1638 | ((member argi '("-scriptload")) | 1640 | ((member argi '("-scriptload")) |
| 1639 | (let* ((file (command-line-normalize-file-name | 1641 | (let* ((file (command-line-normalize-file-name |
| 1640 | (or argval (pop command-line-args-left)))) | 1642 | (or argval (pop command-line-args-left)))) |