aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2012-09-29 11:20:12 -0700
committerGlenn Morris2012-09-29 11:20:12 -0700
commit0e3e4156242bfe3104b8f507a07c38d966d110eb (patch)
treeecf1822046bce3ca3b8c1fc04147a8fc7e7911c6
parentde82e29b3fe963e92ed7f60bc52009e3ef923a29 (diff)
downloademacs-0e3e4156242bfe3104b8f507a07c38d966d110eb.tar.gz
emacs-0e3e4156242bfe3104b8f507a07c38d966d110eb.zip
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.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/progmodes/inf-lisp.el5
2 files changed, 5 insertions, 5 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4e61d02da9e..d6e7b498f4e 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,10 @@
12012-09-29 Glenn Morris <rgm@gnu.org> 12012-09-29 Glenn Morris <rgm@gnu.org>
2 2
3 * progmodes/inf-lisp.el (inferior-lisp-filter-regexp)
4 (inferior-lisp-program, inferior-lisp-load-command)
5 (inferior-lisp-prompt, inferior-lisp-mode-hook):
6 Do not autoload defcustoms.
7
3 * hippie-exp.el (hippie-expand-try-functions-list) 8 * hippie-exp.el (hippie-expand-try-functions-list)
4 (hippie-expand-verbose, hippie-expand-dabbrev-skip-space) 9 (hippie-expand-verbose, hippie-expand-dabbrev-skip-space)
5 (hippie-expand-dabbrev-as-symbol, hippie-expand-no-restriction) 10 (hippie-expand-dabbrev-as-symbol, hippie-expand-no-restriction)
diff --git a/lisp/progmodes/inf-lisp.el b/lisp/progmodes/inf-lisp.el
index 401970b2ce8..cccda962082 100644
--- a/lisp/progmodes/inf-lisp.el
+++ b/lisp/progmodes/inf-lisp.el
@@ -69,7 +69,6 @@
69 :group 'lisp 69 :group 'lisp
70 :version "22.1") 70 :version "22.1")
71 71
72;;;###autoload
73(defcustom inferior-lisp-filter-regexp 72(defcustom inferior-lisp-filter-regexp
74 (purecopy "\\`\\s *\\(:\\(\\w\\|\\s_\\)\\)?\\s *\\'") 73 (purecopy "\\`\\s *\\(:\\(\\w\\|\\s_\\)\\)?\\s *\\'")
75 "What not to save on inferior Lisp's input history. 74 "What not to save on inferior Lisp's input history.
@@ -137,13 +136,11 @@ mode. Default is whitespace followed by 0 or 1 single-letter colon-keyword
137 (define-key inferior-lisp-mode-map "\C-cv" 136 (define-key inferior-lisp-mode-map "\C-cv"
138 'lisp-show-variable-documentation)) 137 'lisp-show-variable-documentation))
139 138
140;;;###autoload
141(defcustom inferior-lisp-program (purecopy "lisp") 139(defcustom inferior-lisp-program (purecopy "lisp")
142 "Program name for invoking an inferior Lisp in Inferior Lisp mode." 140 "Program name for invoking an inferior Lisp in Inferior Lisp mode."
143 :type 'string 141 :type 'string
144 :group 'inferior-lisp) 142 :group 'inferior-lisp)
145 143
146;;;###autoload
147(defcustom inferior-lisp-load-command (purecopy "(load \"%s\")\n") 144(defcustom inferior-lisp-load-command (purecopy "(load \"%s\")\n")
148 "Format-string for building a Lisp expression to load a file. 145 "Format-string for building a Lisp expression to load a file.
149This format string should use `%s' to substitute a file name 146This format string should use `%s' to substitute a file name
@@ -155,7 +152,6 @@ but it works only in Common Lisp."
155 :type 'string 152 :type 'string
156 :group 'inferior-lisp) 153 :group 'inferior-lisp)
157 154
158;;;###autoload
159(defcustom inferior-lisp-prompt (purecopy "^[^> \n]*>+:? *") 155(defcustom inferior-lisp-prompt (purecopy "^[^> \n]*>+:? *")
160 "Regexp to recognize prompts in the Inferior Lisp mode. 156 "Regexp to recognize prompts in the Inferior Lisp mode.
161Defaults to \"^[^> \\n]*>+:? *\", which works pretty good for Lucid, kcl, 157Defaults to \"^[^> \\n]*>+:? *\", which works pretty good for Lucid, kcl,
@@ -207,7 +203,6 @@ one process, this does the right thing. If you run multiple
207processes, you can change `inferior-lisp-buffer' to another process 203processes, you can change `inferior-lisp-buffer' to another process
208buffer with \\[set-variable].") 204buffer with \\[set-variable].")
209 205
210;;;###autoload
211(defvar inferior-lisp-mode-hook '() 206(defvar inferior-lisp-mode-hook '()
212 "Hook for customizing Inferior Lisp mode.") 207 "Hook for customizing Inferior Lisp mode.")
213 208