diff options
| author | Richard M. Stallman | 2005-08-09 11:30:12 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2005-08-09 11:30:12 +0000 |
| commit | 56b3b16bc224784152e80e08ec60947a858c8b25 (patch) | |
| tree | 23592cc2d7efd12e84afcfae3e9cbd0137b557a0 | |
| parent | 0f0cef08e6f9fc6cf771bea57cf8edd3c3dfc44d (diff) | |
| download | emacs-56b3b16bc224784152e80e08ec60947a858c8b25.tar.gz emacs-56b3b16bc224784152e80e08ec60947a858c8b25.zip | |
Comment change.
| -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)))) |