diff options
| author | Richard M. Stallman | 1997-05-27 20:37:34 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-05-27 20:37:34 +0000 |
| commit | 94aba130a03290347639e7a7ae4d967ea276c3c5 (patch) | |
| tree | c32a639e79d59c04a238c73bcb73ccd495ad6b81 | |
| parent | 0acdb863266c82fe90226a7eacb1b53860e6701d (diff) | |
| download | emacs-94aba130a03290347639e7a7ae4d967ea276c3c5.tar.gz emacs-94aba130a03290347639e7a7ae4d967ea276c3c5.zip | |
(ielm-input): New defvar.
| -rw-r--r-- | lisp/ielm.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/ielm.el b/lisp/ielm.el index a05f23017ba..3af4d9df3a3 100644 --- a/lisp/ielm.el +++ b/lisp/ielm.el | |||
| @@ -103,7 +103,7 @@ This variable is buffer-local.") | |||
| 103 | (defvar ielm-header | 103 | (defvar ielm-header |
| 104 | (concat | 104 | (concat |
| 105 | "*** Welcome to IELM version " | 105 | "*** Welcome to IELM version " |
| 106 | (substring "$Revision: 1.11 $" 11 -2) | 106 | (substring "$Revision: 1.12 $" 11 -2) |
| 107 | " *** Type (describe-mode) for help.\n" | 107 | " *** Type (describe-mode) for help.\n" |
| 108 | "IELM has ABSOLUTELY NO WARRANTY; type (describe-no-warranty) for details.\n") | 108 | "IELM has ABSOLUTELY NO WARRANTY; type (describe-no-warranty) for details.\n") |
| 109 | "Message to display when IELM is started.") | 109 | "Message to display when IELM is started.") |
| @@ -227,6 +227,8 @@ simply inserts a newline." | |||
| 227 | (newline-and-indent))) | 227 | (newline-and-indent))) |
| 228 | (newline))) | 228 | (newline))) |
| 229 | 229 | ||
| 230 | (defvar ielm-input) | ||
| 231 | |||
| 230 | (defun ielm-input-sender (proc input) | 232 | (defun ielm-input-sender (proc input) |
| 231 | ;; Just sets the variable ielm-input, which is in the scope of | 233 | ;; Just sets the variable ielm-input, which is in the scope of |
| 232 | ;; `ielm-send-input's call. | 234 | ;; `ielm-send-input's call. |