diff options
| author | Dan Nicolaescu | 1998-04-20 02:34:53 +0000 |
|---|---|---|
| committer | Dan Nicolaescu | 1998-04-20 02:34:53 +0000 |
| commit | cd32a7baa4746f699fa4d945c1b1b9e50a9486da (patch) | |
| tree | cabc0a074c3be5317cdcbed2883b3849e9ed241f | |
| parent | e8bcd26ec19d7631a21aa0fc07b4fd076eb91d55 (diff) | |
| download | emacs-cd32a7baa4746f699fa4d945c1b1b9e50a9486da.tar.gz emacs-cd32a7baa4746f699fa4d945c1b1b9e50a9486da.zip | |
*** empty log message ***
| -rw-r--r-- | lisp/calendar/diary-lib.el | 9 | ||||
| -rw-r--r-- | lisp/cus-edit.el | 6 | ||||
| -rw-r--r-- | lisp/dabbrev.el | 3 | ||||
| -rw-r--r-- | lisp/desktop.el | 3 | ||||
| -rw-r--r-- | lisp/emacs-lisp/debug.el | 6 | ||||
| -rw-r--r-- | lisp/frame.el | 3 | ||||
| -rw-r--r-- | lisp/gnus/gnus-art.el | 6 | ||||
| -rw-r--r-- | lisp/hexl.el | 3 | ||||
| -rw-r--r-- | lisp/international/ccl.el | 3 | ||||
| -rw-r--r-- | lisp/mail/rmail.el | 3 | ||||
| -rw-r--r-- | lisp/progmodes/etags.el | 3 | ||||
| -rw-r--r-- | lisp/progmodes/octave-mod.el | 3 | ||||
| -rw-r--r-- | lisp/progmodes/sh-script.el | 3 | ||||
| -rw-r--r-- | lisp/replace.el | 6 | ||||
| -rw-r--r-- | lisp/vc-hooks.el | 5 | ||||
| -rw-r--r-- | lisp/vc.el | 5 | ||||
| -rw-r--r-- | lisp/vcursor.el | 6 |
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 | |||
| 946 | before those with times; 9999 would place entries with no recognizable time | 948 | before those with times; 9999 would place entries with no recognizable time |
| 947 | after those with times." | 949 | after 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''. |
| 378 | The function is called from the article buffer." | 378 | The 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 @@ | |||
| 104 | Most commonly used to specify `-g' to enable GSS-API authentication | 104 | Most commonly used to specify `-g' to enable GSS-API authentication |
| 105 | or `-k' to enable Kerberos authentication." | 105 | or `-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." | |||
| 170 | See `sh-feature'." | 170 | See `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 | |||
| 43 | is used as a variable to hold a history list for the strings | 43 | is used as a variable to hold a history list for the strings |
| 44 | or patterns to be replaced." | 44 | or 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 | |||
| 51 | is used as a variable to hold a history list for replacement | 52 | is used as a variable to hold a history list for replacement |
| 52 | strings or patterns." | 53 | strings 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 | |||
| 125 | containing corresponding RCS files but don't have RCS available; | 125 | containing corresponding RCS files but don't have RCS available; |
| 126 | similarly for other version control systems." | 126 | similarly 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. |
| 117 | This can be overriden by giving a prefix argument to \\[vc-register]." | 117 | This 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 | |||
| 337 | interpretation of strings is done: \"\C-x\" is a string of four | 337 | interpretation of strings is done: \"\C-x\" is a string of four |
| 338 | characters. The default is simply to copy strings." | 338 | characters. 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. |