Parent Directory | Revision Log | Patch
revision 1.373 by rms, Tue Aug 9 11:29:43 2005 UTC | revision 1.374 by rms, Tue Aug 9 11:30:12 2005 UTC | |
---|---|---|
# | Line 1635 normal otherwise." | Line 1635 normal otherwise." |
1635 | (setq file file-ex)) | (setq file file-ex)) |
1636 | (load file nil t))) | (load file nil t))) |
1637 | ||
1638 | ;; This is used to handle -script. It's not clear | |
1639 | ;; we need to document it. | |
1640 | ((member argi '("-scriptload")) | ((member argi '("-scriptload")) |
1641 | (let* ((file (command-line-normalize-file-name | (let* ((file (command-line-normalize-file-name |
1642 | (or argval (pop command-line-args-left)))) | (or argval (pop command-line-args-left)))) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |