entered into RCS

1 files changed, 6 insertions, 0 deletions

diff --git a/lisp/progmodes/inf-lisp.el b/lisp/progmodes/inf-lisp.el
index 820ae27389..5706990ea5 100644
--- a/lisp/progmodes/inf-lisp.el
+++ b/lisp/progmodes/inf-lisp.el
@@ -142,6 +142,7 @@
 (require 'lisp-mode)
 
 
+;;;###autoload
 (defvar inferior-lisp-filter-regexp "\\`\\s *\\(:\\(\\w\\|\\s_\\)\\)?\\s *\\'"
   "*What not to save on inferior Lisp's input history
 Input matching this regexp is not saved on the input history in inferior-lisp
@@ -212,9 +213,11 @@ You can modify this function to install just the bindings you want."
     'lisp-show-variable-documentation))
 
 
+;;;###autoload
 (defvar inferior-lisp-program "lisp"
   "*Program name for invoking an inferior Lisp with `inferior-lisp'.")
 
+;;;###autoload
 (defvar inferior-lisp-load-command "(load \"%s\")\n"
   "*Format-string for building a Lisp expression to load a file.
 This format string should use %s to substitute a file name
@@ -224,6 +227,7 @@ The string \"(progn (load \\\"%s\\\" :verbose nil :print t) (values))\\\n\"
 produces cosmetically superior output for this application,
 but it works only in Common Lisp.")
 
+;;;###autoload
 (defvar inferior-lisp-prompt "^[^> ]*>+:? *"
   "Regexp to recognise prompts in the inferior Lisp.
 Defaults to \"^[^> ]*>+:? *\", which works pretty good for Lucid, kcl,
@@ -237,6 +241,7 @@ kcl: \"^>+ *\"
 
 This is a fine thing to set in your .emacs file.")
 
+;;;###autoload
 (defvar inferior-lisp-mode-hook '()
   "*Hook for customising inferior-lisp mode")
 
@@ -304,6 +309,7 @@ to continue it."
   "Don't save anything matching inferior-lisp-filter-regexp"
   (not (string-match inferior-lisp-filter-regexp str)))
 
+;;;###autoload
 (defun inferior-lisp (cmd)
   "Run an inferior Lisp process, input and output via buffer *inferior-lisp*.
 If there is a process already running in *inferior-lisp*, just switch