diff options
| author | Pavel Janík <Pavel@Janik.cz> | 2001-12-20 18:59:32 +0000 |
|---|---|---|
| committer | Pavel Janík <Pavel@Janik.cz> | 2001-12-20 18:59:32 +0000 |
| commit | 0ff9b955fe8d8032f5c139dcc86990f0177b646f (patch) | |
| tree | ca703702f9fd7d7a9a15f77cb5cdc28c5767bdc2 /lisp/cmuscheme.el | |
| parent | 3c08498acc0ad4b82ffa5e13b87f098cdb5fcda8 (diff) | |
| download | emacs-0ff9b955fe8d8032f5c139dcc86990f0177b646f.tar.gz | |
Doc fixes.
Diffstat (limited to 'lisp/cmuscheme.el')
| -rw-r--r-- | lisp/cmuscheme.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/cmuscheme.el b/lisp/cmuscheme.el index 5d2e1e25e10..770d5c90c2f 100644 --- a/lisp/cmuscheme.el +++ b/lisp/cmuscheme.el @@ -352,7 +352,7 @@ next one.") (defun scheme-load-file (file-name) "Load a Scheme file FILE-NAME into the inferior Scheme process." (interactive (comint-get-source "Load Scheme file: " scheme-prev-l/c-dir/file - scheme-source-modes t)) ; T because LOAD + scheme-source-modes t)) ; t because `load' ; needs an exact name (comint-check-source file-name) ; Check to see if buffer needs saved. (setq scheme-prev-l/c-dir/file (cons (file-name-directory file-name) @@ -366,7 +366,7 @@ next one.") (interactive (comint-get-source "Compile Scheme file: " scheme-prev-l/c-dir/file scheme-source-modes - nil)) ; NIL because COMPILE doesn't + nil)) ; nil because COMPILE doesn't ; need an exact name. (comint-check-source file-name) ; Check to see if buffer needs saved. (setq scheme-prev-l/c-dir/file (cons (file-name-directory file-name) |