[Emacs-diffs] /srv/bzr/emacs/trunk r110247: Do not autoload defcustoms in inf-lisp.el

[Glenn Morris]

------------------------------------------------------------
revno: 110247
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Sat 2012-09-29 11:20:12 -0700
message:
  Do not autoload defcustoms in inf-lisp.el
  
  * lisp/progmodes/inf-lisp.el (inferior-lisp-filter-regexp)
  (inferior-lisp-program, inferior-lisp-load-command)
  (inferior-lisp-prompt, inferior-lisp-mode-hook):
  Do not autoload defcustoms.
modified:
  lisp/ChangeLog
  lisp/progmodes/inf-lisp.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-09-29 18:15:57 +0000
+++ b/lisp/ChangeLog    2012-09-29 18:20:12 +0000
@@ -1,5 +1,10 @@
 2012-09-29  Glenn Morris  <address@hidden>
 
+       * progmodes/inf-lisp.el (inferior-lisp-filter-regexp)
+       (inferior-lisp-program, inferior-lisp-load-command)
+       (inferior-lisp-prompt, inferior-lisp-mode-hook):
+       Do not autoload defcustoms.
+
        * hippie-exp.el (hippie-expand-try-functions-list)
        (hippie-expand-verbose, hippie-expand-dabbrev-skip-space)
        (hippie-expand-dabbrev-as-symbol, hippie-expand-no-restriction)

=== modified file 'lisp/progmodes/inf-lisp.el'
--- a/lisp/progmodes/inf-lisp.el        2012-09-17 05:41:04 +0000
+++ b/lisp/progmodes/inf-lisp.el        2012-09-29 18:20:12 +0000
@@ -69,7 +69,6 @@
   :group 'lisp
   :version "22.1")
 
-;;;###autoload
 (defcustom inferior-lisp-filter-regexp
   (purecopy "\\`\\s *\\(:\\(\\w\\|\\s_\\)\\)?\\s *\\'")
   "What not to save on inferior Lisp's input history.
@@ -137,13 +136,11 @@
   (define-key inferior-lisp-mode-map "\C-cv"
     'lisp-show-variable-documentation))
 
-;;;###autoload
 (defcustom inferior-lisp-program (purecopy "lisp")
   "Program name for invoking an inferior Lisp in Inferior Lisp mode."
   :type 'string
   :group 'inferior-lisp)
 
-;;;###autoload
 (defcustom inferior-lisp-load-command (purecopy "(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
@@ -155,7 +152,6 @@
   :type 'string
   :group 'inferior-lisp)
 
-;;;###autoload
 (defcustom inferior-lisp-prompt (purecopy "^[^> \n]*>+:? *")
   "Regexp to recognize prompts in the Inferior Lisp mode.
 Defaults to \"^[^> \\n]*>+:? *\", which works pretty good for Lucid, kcl,
@@ -207,7 +203,6 @@
 processes, you can change `inferior-lisp-buffer' to another process
 buffer with \\[set-variable].")
 
-;;;###autoload
 (defvar inferior-lisp-mode-hook '()
   "Hook for customizing Inferior Lisp mode.")