From 0ff9b955fe8d8032f5c139dcc86990f0177b646f Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Pavel=20Jan=C3=ADk?= Date: Thu, 20 Dec 2001 18:59:32 +0000 Subject: Doc fixes. --- lisp/cmuscheme.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/cmuscheme.el') 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) -- cgit v1.2.1