aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDan Nicolaescu1998-04-20 02:34:53 +0000
committerDan Nicolaescu1998-04-20 02:34:53 +0000
commitcd32a7baa4746f699fa4d945c1b1b9e50a9486da (patch)
treecabc0a074c3be5317cdcbed2883b3849e9ed241f
parente8bcd26ec19d7631a21aa0fc07b4fd076eb91d55 (diff)
downloademacs-cd32a7baa4746f699fa4d945c1b1b9e50a9486da.tar.gz
emacs-cd32a7baa4746f699fa4d945c1b1b9e50a9486da.zip
*** empty log message ***
-rw-r--r--lisp/calendar/diary-lib.el9
-rw-r--r--lisp/cus-edit.el6
-rw-r--r--lisp/dabbrev.el3
-rw-r--r--lisp/desktop.el3
-rw-r--r--lisp/emacs-lisp/debug.el6
-rw-r--r--lisp/frame.el3
-rw-r--r--lisp/gnus/gnus-art.el6
-rw-r--r--lisp/hexl.el3
-rw-r--r--lisp/international/ccl.el3
-rw-r--r--lisp/mail/rmail.el3
-rw-r--r--lisp/progmodes/etags.el3
-rw-r--r--lisp/progmodes/octave-mod.el3
-rw-r--r--lisp/progmodes/sh-script.el3
-rw-r--r--lisp/replace.el6
-rw-r--r--lisp/vc-hooks.el5
-rw-r--r--lisp/vc.el5
-rw-r--r--lisp/vcursor.el6
17 files changed, 50 insertions, 26 deletions
diff --git a/lisp/calendar/diary-lib.el b/lisp/calendar/diary-lib.el
index a8c24e05b74..30aaa4ba287 100644
--- a/lisp/calendar/diary-lib.el
+++ b/lisp/calendar/diary-lib.el
@@ -589,12 +589,14 @@ is created."
589 (if (boundp 'user-mail-address) user-mail-address nil) 589 (if (boundp 'user-mail-address) user-mail-address nil)
590 "*Email address that `diary-mail-entries' will send email to." 590 "*Email address that `diary-mail-entries' will send email to."
591 :group 'diary 591 :group 'diary
592 :type 'string) 592 :type 'string
593 :version "20.3")
593 594
594(defcustom diary-mail-days 7 595(defcustom diary-mail-days 7
595 "*Number of days for `diary-mail-entries' to check." 596 "*Number of days for `diary-mail-entries' to check."
596 :group 'diary 597 :group 'diary
597 :type 'integer) 598 :type 'integer
599 :version "20.3")
598 600
599(defun diary-mail-entries (&optional ndays) 601(defun diary-mail-entries (&optional ndays)
600 "Send a mail message showing diary entries for next NDAYS days. 602 "Send a mail message showing diary entries for next NDAYS days.
@@ -946,7 +948,8 @@ The default value -9999 causes entries with no recognizable time to be placed
946before those with times; 9999 would place entries with no recognizable time 948before those with times; 9999 would place entries with no recognizable time
947after those with times." 949after those with times."
948 :type 'integer 950 :type 'integer
949 :group 'diary) 951 :group 'diary
952 :version "20.3")
950 953
951(defun diary-entry-time (s) 954(defun diary-entry-time (s)
952 "Time at the beginning of the string S in a military-style integer. For 955 "Time at the beginning of the string S in a military-style integer. For
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index f35a075456d..b9d34f3944e 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -1781,7 +1781,8 @@ If INITIAL-STRING is non-nil, use that rather than \"Parent groups:\"."
1781 "Default form of displaying variable values." 1781 "Default form of displaying variable values."
1782 :type '(choice (const edit) 1782 :type '(choice (const edit)
1783 (const lisp)) 1783 (const lisp))
1784 :group 'custom-buffer) 1784 :group 'custom-buffer
1785 :version "20.3")
1785 1786
1786(define-widget 'custom-variable 'custom 1787(define-widget 'custom-variable 'custom
1787 "Customize variable." 1788 "Customize variable."
@@ -2226,7 +2227,8 @@ Match frames with dark backgrounds.")
2226 :type '(choice (const all) 2227 :type '(choice (const all)
2227 (const selected) 2228 (const selected)
2228 (const lisp)) 2229 (const lisp))
2229 :group 'custom-buffer) 2230 :group 'custom-buffer
2231 :version "20.3")
2230 2232
2231(define-widget 'custom-face 'custom 2233(define-widget 'custom-face 'custom
2232 "Customize face." 2234 "Customize face."
diff --git a/lisp/dabbrev.el b/lisp/dabbrev.el
index 58097bdd4c5..c35db2fcb98 100644
--- a/lisp/dabbrev.el
+++ b/lisp/dabbrev.el
@@ -199,7 +199,8 @@ all the other buffers, except those named in `dabbrev-ignored-buffer-names'."
199(defcustom dabbrev-ignored-buffer-names '("*Messages") 199(defcustom dabbrev-ignored-buffer-names '("*Messages")
200 "*List of buffer names that dabbrev should not check." 200 "*List of buffer names that dabbrev should not check."
201 :type '(repeat (string :tag "Buffer name")) 201 :type '(repeat (string :tag "Buffer name"))
202 :group 'dabbrev) 202 :group 'dabbrev
203 :version "20.3")
203 204
204(defcustom dabbrev-check-other-buffers t 205(defcustom dabbrev-check-other-buffers t
205 "*Should \\[dabbrev-expand] look in other buffers?\ 206 "*Should \\[dabbrev-expand] look in other buffers?\
diff --git a/lisp/desktop.el b/lisp/desktop.el
index c49ea6d40f7..979f12b3b08 100644
--- a/lisp/desktop.el
+++ b/lisp/desktop.el
@@ -113,7 +113,8 @@
113 :group 'desktop 113 :group 'desktop
114 :type 'boolean 114 :type 'boolean
115 :require 'desktop 115 :require 'desktop
116 :initialize 'custom-initialize-default) 116 :initialize 'custom-initialize-default
117 :version "20.3")
117 118
118(defcustom desktop-basefilename 119(defcustom desktop-basefilename
119 (convert-standard-filename ".emacs.desktop") 120 (convert-standard-filename ".emacs.desktop")
diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el
index 33ea729ccc2..f8c1f862f69 100644
--- a/lisp/emacs-lisp/debug.el
+++ b/lisp/emacs-lisp/debug.el
@@ -36,7 +36,8 @@
36(defcustom debugger-mode-hook nil 36(defcustom debugger-mode-hook nil
37 "*Hooks run when `debugger-mode' is turned on." 37 "*Hooks run when `debugger-mode' is turned on."
38 :type 'hook 38 :type 'hook
39 :group 'debugger) 39 :group 'debugger
40 :version "20.3")
40 41
41 42
42(defcustom debug-function-list nil 43(defcustom debug-function-list nil
@@ -412,7 +413,8 @@ Applies to the frame whose line point is on in the backtrace."
412(defcustom debugger-record-buffer "*Debugger-record*" 413(defcustom debugger-record-buffer "*Debugger-record*"
413 "*Buffer name for expression values, for \\[debugger-record-expression]." 414 "*Buffer name for expression values, for \\[debugger-record-expression]."
414 :type 'string 415 :type 'string
415 :group 'debugger) 416 :group 'debugger
417 :version "20.3")
416 418
417(defun debugger-record-expression (exp) 419(defun debugger-record-expression (exp)
418 "Display a variable's value and record it in `*Backtrace-record*' buffer." 420 "Display a variable's value and record it in `*Backtrace-record*' buffer."
diff --git a/lisp/frame.el b/lisp/frame.el
index ba9d089eaac..44923e05324 100644
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -500,7 +500,8 @@ the user during startup."
500(defcustom focus-follows-mouse t 500(defcustom focus-follows-mouse t
501 "*Non-nil if window system changes focus when you move the mouse." 501 "*Non-nil if window system changes focus when you move the mouse."
502 :type 'boolean 502 :type 'boolean
503 :group 'frames) 503 :group 'frames
504 :version "20.3")
504 505
505(defun other-frame (arg) 506(defun other-frame (arg)
506 "Select the ARG'th different visible frame, and raise it. 507 "Select the ARG'th different visible frame, and raise it.
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 1df219fab65..7ba8a9de593 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -377,7 +377,8 @@ The function is called from the article buffer."
377 "Function to decode ``localized RFC 822 messages''. 377 "Function to decode ``localized RFC 822 messages''.
378The function is called from the article buffer." 378The function is called from the article buffer."
379 :group 'gnus-article-mime 379 :group 'gnus-article-mime
380 :type 'function) 380 :type 'function
381 :version "20.3")
381 382
382(defcustom gnus-page-delimiter "^\^L" 383(defcustom gnus-page-delimiter "^\^L"
383 "*Regexp describing what to use as article page delimiters. 384 "*Regexp describing what to use as article page delimiters.
@@ -411,7 +412,8 @@ If you want to run a special decoding program like nkf, use this hook."
411(defcustom gnus-article-hide-pgp-hook nil 412(defcustom gnus-article-hide-pgp-hook nil
412 "*A hook called after successfully hiding a PGP signature." 413 "*A hook called after successfully hiding a PGP signature."
413 :type 'hook 414 :type 'hook
414 :group 'gnus-article-various) 415 :group 'gnus-article-various
416 :version "20.3")
415 417
416(defcustom gnus-article-button-face 'bold 418(defcustom gnus-article-button-face 'bold
417 "Face used for highlighting buttons in the article buffer. 419 "Face used for highlighting buttons in the article buffer.
diff --git a/lisp/hexl.el b/lisp/hexl.el
index 6872c12d594..67b5ee9ae85 100644
--- a/lisp/hexl.el
+++ b/lisp/hexl.el
@@ -91,7 +91,8 @@ and \"-de\" when dehexlifying a buffer."
91(defcustom hexl-follow-ascii t 91(defcustom hexl-follow-ascii t
92 "If non-nil then highlight the ASCII character corresponding to point." 92 "If non-nil then highlight the ASCII character corresponding to point."
93 :type 'boolean 93 :type 'boolean
94 :group 'hexl) 94 :group 'hexl
95 :version "20.3")
95 96
96(defvar hexl-max-address 0 97(defvar hexl-max-address 0
97 "Maximum offset into hexl buffer.") 98 "Maximum offset into hexl buffer.")
diff --git a/lisp/international/ccl.el b/lisp/international/ccl.el
index d3514408c44..3dcecc11e4a 100644
--- a/lisp/international/ccl.el
+++ b/lisp/international/ccl.el
@@ -176,7 +176,8 @@
176 ] 176 ]
177 "Vector of CCL extended compiled codes (symbols)." 177 "Vector of CCL extended compiled codes (symbols)."
178 :type '(vector (repeat :inline t symbol)) 178 :type '(vector (repeat :inline t symbol))
179 :group 'ccl) 179 :group 'ccl
180 :version "20.3")
180 181
181;; Put a property to each symbol of CCL codes for the disassembler. 182;; Put a property to each symbol of CCL codes for the disassembler.
182(let (code (i 0) (len (length ccl-code-table))) 183(let (code (i 0) (len (length ccl-code-table)))
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 078d48b72f7..d481b8b7918 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -104,7 +104,8 @@
104Most commonly used to specify `-g' to enable GSS-API authentication 104Most commonly used to specify `-g' to enable GSS-API authentication
105or `-k' to enable Kerberos authentication." 105or `-k' to enable Kerberos authentication."
106 :type '(repeat string) 106 :type '(repeat string)
107 :group 'rmail-retrieve) 107 :group 'rmail-retrieve
108 :version "20.3")
108 109
109(defvar rmail-pop-password-error "invalid usercode or password" 110(defvar rmail-pop-password-error "invalid usercode or password"
110 "Regular expression matching incorrect-password POP server error messages. 111 "Regular expression matching incorrect-password POP server error messages.
diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el
index 31a8158e3a6..cac5b3d25dc 100644
--- a/lisp/progmodes/etags.el
+++ b/lisp/progmodes/etags.el
@@ -110,7 +110,8 @@ Otherwise, `find-tag-default' is used."
110(defcustom find-tag-marker-ring-length 16 110(defcustom find-tag-marker-ring-length 16
111 "*Length of marker rings `find-tag-marker-ring' and `tags-location-ring'." 111 "*Length of marker rings `find-tag-marker-ring' and `tags-location-ring'."
112 :group 'etags 112 :group 'etags
113 :type 'integer) 113 :type 'integer
114 :version "20.3")
114 115
115(defvar find-tag-marker-ring (make-ring find-tag-marker-ring-length) 116(defvar find-tag-marker-ring (make-ring find-tag-marker-ring-length)
116 "Ring of markers which are locations from which \\[find-tag] was invoked.") 117 "Ring of markers which are locations from which \\[find-tag] was invoked.")
diff --git a/lisp/progmodes/octave-mod.el b/lisp/progmodes/octave-mod.el
index e8f3724689b..f97b595b62d 100644
--- a/lisp/progmodes/octave-mod.el
+++ b/lisp/progmodes/octave-mod.el
@@ -308,7 +308,8 @@ parenthetical grouping.")
308(defcustom octave-auto-indent nil 308(defcustom octave-auto-indent nil
309 "*Non-nil means indent line after a semicolon or space in Octave mode." 309 "*Non-nil means indent line after a semicolon or space in Octave mode."
310 :type 'boolean 310 :type 'boolean
311 :group 'octave) 311 :group 'octave
312 :version "20.3")
312 313
313(defcustom octave-auto-newline nil 314(defcustom octave-auto-newline nil
314 "*Non-nil means automatically newline after a semicolon in Octave mode." 315 "*Non-nil means automatically newline after a semicolon in Octave mode."
diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el
index 32273e66d1c..508a9abaf4e 100644
--- a/lisp/progmodes/sh-script.el
+++ b/lisp/progmodes/sh-script.el
@@ -170,7 +170,8 @@ shell it really is."
170See `sh-feature'." 170See `sh-feature'."
171 :type '(repeat (cons (symbol :tag "Shell") 171 :type '(repeat (cons (symbol :tag "Shell")
172 regexp)) 172 regexp))
173 :group 'sh-script) 173 :group 'sh-script
174 :version "20.3")
174 175
175(defvar sh-shell-variables nil 176(defvar sh-shell-variables nil
176 "Alist of shell variable names that should be included in completion. 177 "Alist of shell variable names that should be included in completion.
diff --git a/lisp/replace.el b/lisp/replace.el
index ebe3088c04e..07d5892e458 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -43,7 +43,8 @@ The value of this variable should be a symbol; that symbol
43is used as a variable to hold a history list for the strings 43is used as a variable to hold a history list for the strings
44or patterns to be replaced." 44or patterns to be replaced."
45 :group 'matching 45 :group 'matching
46 :type 'symbol) 46 :type 'symbol
47 :version "20.3")
47 48
48(defcustom query-replace-to-history-variable 'query-replace-history 49(defcustom query-replace-to-history-variable 'query-replace-history
49 "History list to use for the TO argument of query-replace commands. 50 "History list to use for the TO argument of query-replace commands.
@@ -51,7 +52,8 @@ The value of this variable should be a symbol; that symbol
51is used as a variable to hold a history list for replacement 52is used as a variable to hold a history list for replacement
52strings or patterns." 53strings or patterns."
53 :group 'matching 54 :group 'matching
54 :type 'symbol) 55 :type 'symbol
56 :version "20.3")
55 57
56(defun query-replace-read-args (string regexp-flag) 58(defun query-replace-read-args (string regexp-flag)
57 (let (from to) 59 (let (from to)
diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el
index a8d3db5fa0e..cfbb1111cba 100644
--- a/lisp/vc-hooks.el
+++ b/lisp/vc-hooks.el
@@ -5,7 +5,7 @@
5;; Author: Eric S. Raymond <esr@snark.thyrsus.com> 5;; Author: Eric S. Raymond <esr@snark.thyrsus.com>
6;; Maintainer: Andre Spiegel <spiegel@inf.fu-berlin.de> 6;; Maintainer: Andre Spiegel <spiegel@inf.fu-berlin.de>
7 7
8;; $Id: vc-hooks.el,v 1.104 1998/04/04 05:21:44 rms Exp spiegel $ 8;; $Id: vc-hooks.el,v 1.105 1998/04/05 18:44:35 spiegel Exp done $
9 9
10;; This file is part of GNU Emacs. 10;; This file is part of GNU Emacs.
11 11
@@ -125,7 +125,8 @@ It may be useful to set this if (say) you edit files in a directory
125containing corresponding RCS files but don't have RCS available; 125containing corresponding RCS files but don't have RCS available;
126similarly for other version control systems." 126similarly for other version control systems."
127 :type 'boolean 127 :type 'boolean
128 :group 'vc) 128 :group 'vc
129 :version "20.3")
129 130
130(defun vc-mistrust-permissions (file) 131(defun vc-mistrust-permissions (file)
131 ;; Access function to the above. 132 ;; Access function to the above.
diff --git a/lisp/vc.el b/lisp/vc.el
index 9197d2a2da6..17af1f8a023 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -5,7 +5,7 @@
5;; Author: Eric S. Raymond <esr@snark.thyrsus.com> 5;; Author: Eric S. Raymond <esr@snark.thyrsus.com>
6;; Maintainer: Andre Spiegel <spiegel@inf.fu-berlin.de> 6;; Maintainer: Andre Spiegel <spiegel@inf.fu-berlin.de>
7 7
8;; $Id: vc.el,v 1.222 1998/04/15 09:48:04 schwab Exp spiegel $ 8;; $Id: vc.el,v 1.223 1998/04/15 10:13:07 spiegel Exp done $
9 9
10;; This file is part of GNU Emacs. 10;; This file is part of GNU Emacs.
11 11
@@ -116,7 +116,8 @@ If FORM3 is `RCS', use FORM2 for CVS as well as RCS.
116 "*A string used as the default version number when a new file is registered. 116 "*A string used as the default version number when a new file is registered.
117This can be overriden by giving a prefix argument to \\[vc-register]." 117This can be overriden by giving a prefix argument to \\[vc-register]."
118 :type 'string 118 :type 'string
119 :group 'vc) 119 :group 'vc
120 :version "20.3")
120 121
121(defcustom vc-command-messages nil 122(defcustom vc-command-messages nil
122 "*If non-nil, display run messages from back-end commands." 123 "*If non-nil, display run messages from back-end commands."
diff --git a/lisp/vcursor.el b/lisp/vcursor.el
index 1eeed59715f..d4c13f46103 100644
--- a/lisp/vcursor.el
+++ b/lisp/vcursor.el
@@ -337,12 +337,14 @@ This will cause text insertion to be much slower. Note that no special
337interpretation of strings is done: \"\C-x\" is a string of four 337interpretation of strings is done: \"\C-x\" is a string of four
338characters. The default is simply to copy strings." 338characters. The default is simply to copy strings."
339 :type 'boolean 339 :type 'boolean
340 :group 'vcursor) 340 :group 'vcursor
341 :version "20.3")
341 342
342(defcustom vcursor-string "**>" 343(defcustom vcursor-string "**>"
343 "String used to show the vcursor position on dumb terminals." 344 "String used to show the vcursor position on dumb terminals."
344 :type 'string 345 :type 'string
345 :group 'vcursor) 346 :group 'vcursor
347 :version "20.3")
346 348
347(defvar vcursor-overlay nil 349(defvar vcursor-overlay nil
348 "Overlay for the virtual cursor. 350 "Overlay for the virtual cursor.