(Marking Objects): `M-h' accepts prefix arg.

[gnu-emacs] / lisp / xscheme.el

diff --git a/lisp/xscheme.el b/lisp/xscheme.el
index 32b402103db51023daff76617bb1ea31df895096..1ad839d0e694e7ca34cd83ea01f8e6eece04e390 100644 (file)
--- a/lisp/xscheme.el
+++ b/lisp/xscheme.el
@@ -1,4 +1,4 @@
-;;; xscheme.el --- run Scheme under Emacs
+;;; xscheme.el --- run MIT Scheme under Emacs
 
 ;; Copyright (C) 1986, 1987, 1989, 1990 Free Software Foundation, Inc.
 
@@ -37,11 +37,6 @@
   "Major mode for editing Scheme and interacting with MIT's C-Scheme."
   :group 'lisp)
 
-(defcustom scheme-program-name "scheme"
-  "*Program invoked by the `run-scheme' command."
-  :type 'string
-  :group 'xscheme)
-
 (defcustom scheme-band-name nil
   "*Band loaded by the `run-scheme' command."
   :type '(choice (const nil) string)