X-Git-Url: http://git.hcoop.net/bpt/emacs.git/blobdiff_plain/a1ad21ca531e05ef3968e4c9cb3d5927620af30c..76d7458ed90577d639dc71a5e100839d9a9ab13c:/lisp/xscheme.el

diff --git a/lisp/xscheme.el b/lisp/xscheme.el
index 8a281cd0cf..d2a2cceb2a 100644
--- a/lisp/xscheme.el
+++ b/lisp/xscheme.el
@@ -1,4 +1,5 @@
-;; Run Scheme under Emacs
+;;; xscheme.el --- run Scheme under Emacs
+
 ;; Copyright (C) 1986, 1987, 1989, 1990 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -69,6 +70,7 @@ Is processed with `substitute-command-keys' first.")
 (xscheme-evaluation-commands scheme-mode-map)
 (xscheme-interrupt-commands scheme-mode-map)
 
+;;;###autoload
 (defun run-scheme (command-line)
   "Run an inferior Scheme process.
 Output goes to the buffer `*scheme*'.
@@ -868,3 +870,5 @@ the remaining input.")
 		   (let ((state (parse-partial-sexp start (nth 2 state))))
 		     (if (nth 2 state) 'many 'one)))))
 	(set-syntax-table old-syntax-table)))))
+
+;;; xscheme.el ends here