diff options
| author | Richard M. Stallman | 1994-07-25 21:45:36 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-07-25 21:45:36 +0000 |
| commit | 860befc8a298f7bc87b141e90faddb3a144123d4 (patch) | |
| tree | b31768a526d4f93cf21ca03a89818500f5308398 | |
| parent | e307a7b225d9246a769abae7e3e855f274145717 (diff) | |
| download | emacs-860befc8a298f7bc87b141e90faddb3a144123d4.tar.gz emacs-860befc8a298f7bc87b141e90faddb3a144123d4.zip | |
(command-line-args-left): Add defvar.
| -rw-r--r-- | lisp/startup.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/startup.el b/lisp/startup.el index 251f395abd7..a31aa73f7d4 100644 --- a/lisp/startup.el +++ b/lisp/startup.el | |||
| @@ -81,6 +81,9 @@ Elements look like (SWITCH-STRING . HANDLER-FUNCTION). | |||
| 81 | HANDLER-FUNCTION receives switch name as sole arg; | 81 | HANDLER-FUNCTION receives switch name as sole arg; |
| 82 | remaining command-line args are in the variable `command-line-args-left'.") | 82 | remaining command-line args are in the variable `command-line-args-left'.") |
| 83 | 83 | ||
| 84 | (defvar command-line-args-left nil | ||
| 85 | "List of command-line args not yet processed.") | ||
| 86 | |||
| 84 | (defvar command-line-functions nil ;; lrs 7/31/89 | 87 | (defvar command-line-functions nil ;; lrs 7/31/89 |
| 85 | "List of functions to process unrecognized command-line arguments. | 88 | "List of functions to process unrecognized command-line arguments. |
| 86 | Each function should access the dynamically bound variables | 89 | Each function should access the dynamically bound variables |