1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00

Add missing :version tags to new defgroups and defcustoms

* window.el (window-sides-slots):
* tool-bar.el (tool-bar-position):
* term/xterm.el (xterm-extra-capabilities):
* ses.el (ses-self-reference-early-detection):
* progmodes/verilog-mode.el (verilog-auto-declare-nettype)
(verilog-auto-wire-type)
(verilog-auto-delete-trailing-whitespace)
(verilog-auto-reset-blocking-in-non, verilog-auto-inst-sort)
(verilog-auto-tieoff-declaration):
* progmodes/sql.el (sql-login-hook, sql-ansi-statement-starters)
(sql-oracle-statement-starters, sql-oracle-scan-on):
* progmodes/prolog.el (prolog-align-comments-flag)
(prolog-indent-mline-comments-flag, prolog-object-end-to-0-flag)
(prolog-left-indent-regexp, prolog-paren-indent-p)
(prolog-paren-indent, prolog-parse-mode, prolog-keywords)
(prolog-types, prolog-mode-specificators)
(prolog-determinism-specificators, prolog-directives)
(prolog-electric-newline-flag, prolog-hungry-delete-key-flag)
(prolog-electric-dot-flag)
(prolog-electric-dot-full-predicate-template)
(prolog-electric-underscore-flag, prolog-electric-tab-flag)
(prolog-electric-if-then-else-flag, prolog-electric-colon-flag)
(prolog-electric-dash-flag, prolog-old-sicstus-keys-flag)
(prolog-program-switches, prolog-prompt-regexp)
(prolog-debug-on-string, prolog-debug-off-string)
(prolog-trace-on-string, prolog-trace-off-string)
(prolog-zip-on-string, prolog-zip-off-string)
(prolog-use-standard-consult-compile-method-flag)
(prolog-use-prolog-tokenizer-flag, prolog-imenu-flag)
(prolog-imenu-max-lines, prolog-info-predicate-index)
(prolog-underscore-wordchar-flag, prolog-use-sicstus-sd)
(prolog-char-quote-workaround):
* progmodes/cc-vars.el (c-defun-tactic):
* net/tramp.el (tramp-encoding-command-interactive)
(tramp-local-end-of-line):
* net/soap-client.el (soap-client):
* net/netrc.el (netrc-file):
* net/gnutls.el (gnutls):
* minibuffer.el (completion-category-overrides)
(completion-cycle-threshold)
(completion-pcm-complete-word-inserts-delimiters):
* man.el (Man-name-local-regexp):
* mail/feedmail.el (feedmail-display-full-frame):
* international/characters.el (glyphless-char-display-control):
* eshell/em-ls.el (eshell-ls-date-format):
* emacs-lisp/cl-indent.el (lisp-lambda-list-keyword-alignment)
(lisp-lambda-list-keyword-parameter-indentation)
(lisp-lambda-list-keyword-parameter-alignment):
* doc-view.el (doc-view-image-width, doc-view-unoconv-program):
* dired-x.el (dired-omit-verbose):
* cus-theme.el (custom-theme-allow-multiple-selections):
* calc/calc.el (calc-highlight-selections-with-faces)
(calc-lu-field-reference, calc-lu-power-reference)
(calc-note-threshold):
* battery.el (battery-mode-line-limit):
* arc-mode.el (archive-7z-extract, archive-7z-expunge)
(archive-7z-update):
* allout.el (allout-prefixed-keybindings)
(allout-unprefixed-keybindings)
(allout-inhibit-auto-fill-on-headline)
(allout-flattened-numbering-abbreviation):
* allout-widgets.el (allout-widgets-auto-activation)
(allout-widgets-icons-dark-subdir)
(allout-widgets-icons-light-subdir, allout-widgets-icon-types)
(allout-widgets-theme-dark-background)
(allout-widgets-theme-light-background)
(allout-widgets-item-image-properties-emacs)
(allout-widgets-item-image-properties-xemacs)
(allout-widgets-run-unit-tests-on-load)
(allout-widgets-time-decoration-activity)
(allout-widgets-hook-error-post-time)
(allout-widgets-track-decoration):
* gnus/sieve-manage.el (sieve-manage-default-stream):
* gnus/shr.el (shr):
* gnus/nnir.el (nnir-ignored-newsgroups, nnir-summary-line-format)
(nnir-retrieve-headers-override-function)
(nnir-imap-default-search-key, nnir-notmuch-program)
(nnir-notmuch-additional-switches, nnir-notmuch-remove-prefix)
(nnir-method-default-engines):
* gnus/message.el (message-cite-reply-position):
* gnus/gssapi.el (gssapi-program):
* gnus/gravatar.el (gravatar):
* gnus/gnus-sum.el (gnus-refer-thread-use-nnir):
* gnus/gnus-registry.el (gnus-registry-unfollowed-addresses)
(gnus-registry-max-pruned-entries):
* gnus/gnus-picon.el (gnus-picon-inhibit-top-level-domains):
* gnus/gnus-int.el (gnus-after-set-mark-hook)
(gnus-before-update-mark-hook):
* gnus/gnus-async.el (gnus-async-post-fetch-function):
* gnus/auth-source.el (auth-source-cache-expiry):
Add missing :version tags to new defcustoms and defgroups.
This commit is contained in:
Glenn Morris 2012-02-11 14:13:29 -08:00
parent c6ad2a4e0b
commit 2bed3f0483
40 changed files with 216 additions and 1 deletions

View file

@ -1,5 +1,79 @@
2012-02-11 Glenn Morris <rgm@gnu.org> 2012-02-11 Glenn Morris <rgm@gnu.org>
* window.el (window-sides-slots):
* tool-bar.el (tool-bar-position):
* term/xterm.el (xterm-extra-capabilities):
* ses.el (ses-self-reference-early-detection):
* progmodes/verilog-mode.el (verilog-auto-declare-nettype)
(verilog-auto-wire-type)
(verilog-auto-delete-trailing-whitespace)
(verilog-auto-reset-blocking-in-non, verilog-auto-inst-sort)
(verilog-auto-tieoff-declaration):
* progmodes/sql.el (sql-login-hook, sql-ansi-statement-starters)
(sql-oracle-statement-starters, sql-oracle-scan-on):
* progmodes/prolog.el (prolog-align-comments-flag)
(prolog-indent-mline-comments-flag, prolog-object-end-to-0-flag)
(prolog-left-indent-regexp, prolog-paren-indent-p)
(prolog-paren-indent, prolog-parse-mode, prolog-keywords)
(prolog-types, prolog-mode-specificators)
(prolog-determinism-specificators, prolog-directives)
(prolog-electric-newline-flag, prolog-hungry-delete-key-flag)
(prolog-electric-dot-flag)
(prolog-electric-dot-full-predicate-template)
(prolog-electric-underscore-flag, prolog-electric-tab-flag)
(prolog-electric-if-then-else-flag, prolog-electric-colon-flag)
(prolog-electric-dash-flag, prolog-old-sicstus-keys-flag)
(prolog-program-switches, prolog-prompt-regexp)
(prolog-debug-on-string, prolog-debug-off-string)
(prolog-trace-on-string, prolog-trace-off-string)
(prolog-zip-on-string, prolog-zip-off-string)
(prolog-use-standard-consult-compile-method-flag)
(prolog-use-prolog-tokenizer-flag, prolog-imenu-flag)
(prolog-imenu-max-lines, prolog-info-predicate-index)
(prolog-underscore-wordchar-flag, prolog-use-sicstus-sd)
(prolog-char-quote-workaround):
* progmodes/cc-vars.el (c-defun-tactic):
* net/tramp.el (tramp-encoding-command-interactive)
(tramp-local-end-of-line):
* net/soap-client.el (soap-client):
* net/netrc.el (netrc-file):
* net/gnutls.el (gnutls):
* minibuffer.el (completion-category-overrides)
(completion-cycle-threshold)
(completion-pcm-complete-word-inserts-delimiters):
* man.el (Man-name-local-regexp):
* mail/feedmail.el (feedmail-display-full-frame):
* international/characters.el (glyphless-char-display-control):
* eshell/em-ls.el (eshell-ls-date-format):
* emacs-lisp/cl-indent.el (lisp-lambda-list-keyword-alignment)
(lisp-lambda-list-keyword-parameter-indentation)
(lisp-lambda-list-keyword-parameter-alignment):
* doc-view.el (doc-view-image-width, doc-view-unoconv-program):
* dired-x.el (dired-omit-verbose):
* cus-theme.el (custom-theme-allow-multiple-selections):
* calc/calc.el (calc-highlight-selections-with-faces)
(calc-lu-field-reference, calc-lu-power-reference)
(calc-note-threshold):
* battery.el (battery-mode-line-limit):
* arc-mode.el (archive-7z-extract, archive-7z-expunge)
(archive-7z-update):
* allout.el (allout-prefixed-keybindings)
(allout-unprefixed-keybindings)
(allout-inhibit-auto-fill-on-headline)
(allout-flattened-numbering-abbreviation):
* allout-widgets.el (allout-widgets-auto-activation)
(allout-widgets-icons-dark-subdir)
(allout-widgets-icons-light-subdir, allout-widgets-icon-types)
(allout-widgets-theme-dark-background)
(allout-widgets-theme-light-background)
(allout-widgets-item-image-properties-emacs)
(allout-widgets-item-image-properties-xemacs)
(allout-widgets-run-unit-tests-on-load)
(allout-widgets-time-decoration-activity)
(allout-widgets-hook-error-post-time)
(allout-widgets-track-decoration):
Add missing :version tags to new defcustoms and defgroups.
* progmodes/sql.el (sql-ansi-statement-starters) * progmodes/sql.el (sql-ansi-statement-starters)
(sql-oracle-statement-starters): Add custom type. (sql-oracle-statement-starters): Add custom type.

View file

@ -131,6 +131,7 @@ explicitly invoke `allout-widgets-mode' in allout buffers where
you want allout widgets operation. you want allout widgets operation.
See `allout-widgets-mode' for allout widgets mode features." See `allout-widgets-mode' for allout widgets mode features."
:version "24.1"
:type 'boolean :type 'boolean
:group 'allout-widgets :group 'allout-widgets
:set 'allout-widgets-setup :set 'allout-widgets-setup
@ -155,16 +156,19 @@ See `allout-widgets-mode' for allout widgets mode features."
;;;_ = allout-widgets-icons-dark-subdir ;;;_ = allout-widgets-icons-dark-subdir
(defcustom allout-widgets-icons-dark-subdir "icons/allout-widgets/dark-bg/" (defcustom allout-widgets-icons-dark-subdir "icons/allout-widgets/dark-bg/"
"Directory on `image-load-path' holding allout icons for dark backgrounds." "Directory on `image-load-path' holding allout icons for dark backgrounds."
:version "24.1"
:type 'string :type 'string
:group 'allout-widgets) :group 'allout-widgets)
;;;_ = allout-widgets-icons-light-subdir ;;;_ = allout-widgets-icons-light-subdir
(defcustom allout-widgets-icons-light-subdir "icons/allout-widgets/light-bg/" (defcustom allout-widgets-icons-light-subdir "icons/allout-widgets/light-bg/"
"Directory on `image-load-path' holding allout icons for light backgrounds." "Directory on `image-load-path' holding allout icons for light backgrounds."
:version "24.1"
:type 'string :type 'string
:group 'allout-widgets) :group 'allout-widgets)
;;;_ = allout-widgets-icon-types ;;;_ = allout-widgets-icon-types
(defcustom allout-widgets-icon-types '(xpm png) (defcustom allout-widgets-icon-types '(xpm png)
"File extensions for the icon graphic format types, in order of preference." "File extensions for the icon graphic format types, in order of preference."
:version "24.1"
:type '(repeat symbol) :type '(repeat symbol)
:group 'allout-widgets) :group 'allout-widgets)
@ -172,23 +176,27 @@ See `allout-widgets-mode' for allout widgets mode features."
;;;_ = allout-widgets-theme-dark-background ;;;_ = allout-widgets-theme-dark-background
(defcustom allout-widgets-theme-dark-background "allout-dark-bg" (defcustom allout-widgets-theme-dark-background "allout-dark-bg"
"Identify the outline's icon theme to use with a dark background." "Identify the outline's icon theme to use with a dark background."
:version "24.1"
:type '(string) :type '(string)
:group 'allout-widgets) :group 'allout-widgets)
;;;_ = allout-widgets-theme-light-background ;;;_ = allout-widgets-theme-light-background
(defcustom allout-widgets-theme-light-background "allout-light-bg" (defcustom allout-widgets-theme-light-background "allout-light-bg"
"Identify the outline's icon theme to use with a light background." "Identify the outline's icon theme to use with a light background."
:version "24.1"
:type '(string) :type '(string)
:group 'allout-widgets) :group 'allout-widgets)
;;;_ = allout-widgets-item-image-properties-emacs ;;;_ = allout-widgets-item-image-properties-emacs
(defcustom allout-widgets-item-image-properties-emacs (defcustom allout-widgets-item-image-properties-emacs
'(:ascent center :mask (heuristic t)) '(:ascent center :mask (heuristic t))
"*Default properties item widget images in mainline Emacs." "*Default properties item widget images in mainline Emacs."
:version "24.1"
:type 'plist :type 'plist
:group 'allout-widgets) :group 'allout-widgets)
;;;_ = allout-widgets-item-image-properties-xemacs ;;;_ = allout-widgets-item-image-properties-xemacs
(defcustom allout-widgets-item-image-properties-xemacs (defcustom allout-widgets-item-image-properties-xemacs
nil nil
"*Default properties item widget images in XEmacs." "*Default properties item widget images in XEmacs."
:version "24.1"
:type 'plist :type 'plist
:group 'allout-widgets) :group 'allout-widgets)
;;;_ . Developer ;;;_ . Developer
@ -204,6 +212,7 @@ doing byte-compilation with a repeat count, so the file is loaded after
compilation.) compilation.)
See `allout-widgets-run-unit-tests' to see what's run." See `allout-widgets-run-unit-tests' to see what's run."
:version "24.1"
:type 'boolean :type 'boolean
:group 'allout-widgets-developer) :group 'allout-widgets-developer)
;;;_ = allout-widgets-time-decoration-activity ;;;_ = allout-widgets-time-decoration-activity
@ -215,6 +224,7 @@ The details are retained as the value of
Generally, allout widgets code developers are the only ones who'll want to Generally, allout widgets code developers are the only ones who'll want to
set this." set this."
:version "24.1"
:type 'boolean :type 'boolean
:group 'allout-widgets-developer) :group 'allout-widgets-developer)
;;;_ = allout-widgets-hook-error-post-time 0 ;;;_ = allout-widgets-hook-error-post-time 0
@ -224,6 +234,7 @@ set this."
0 is minimal, or nil to not post to the message area. 0 is minimal, or nil to not post to the message area.
This is for debugging purposes." This is for debugging purposes."
:version "24.1"
:type 'integer :type 'integer
:group 'allout-widgets-developer) :group 'allout-widgets-developer)
;;;_ = allout-widgets-maintain-tally nil ;;;_ = allout-widgets-maintain-tally nil
@ -235,6 +246,7 @@ This is for debugging purposes.
The tally shows the total number of item widgets in the current The tally shows the total number of item widgets in the current
buffer, and tracking increases as new widgets are added and buffer, and tracking increases as new widgets are added and
decreases as obsolete widgets are garbage collected." decreases as obsolete widgets are garbage collected."
:version "24.1"
:type 'boolean :type 'boolean
:group 'allout-widgets-developer) :group 'allout-widgets-developer)
(defvar allout-widgets-tally nil (defvar allout-widgets-tally nil
@ -268,6 +280,7 @@ The number varies according to the evanescence of objects on a
This is for debugging purposes, and generally set at need in a This is for debugging purposes, and generally set at need in a
buffer rather than as a prevailing configuration \(but it's handy buffer rather than as a prevailing configuration \(but it's handy
to publicize it by making it a customization variable\)." to publicize it by making it a customization variable\)."
:version "24.1"
:type 'boolean :type 'boolean
:group 'allout-widgets-developer) :group 'allout-widgets-developer)
(make-variable-buffer-local 'allout-widgets-track-decoration) (make-variable-buffer-local 'allout-widgets-track-decoration)

View file

@ -240,6 +240,7 @@ See the existing keys for examples.
Functions can be bound to multiple keys, but binding keys to Functions can be bound to multiple keys, but binding keys to
multiple functions will not work - the last binding for a key multiple functions will not work - the last binding for a key
prevails." prevails."
:version "24.1"
:type 'allout-keybindings-binding :type 'allout-keybindings-binding
:group 'allout-keybindings :group 'allout-keybindings
:set 'allout-compose-and-institute-keymap :set 'allout-compose-and-institute-keymap
@ -263,6 +264,7 @@ Use vector format for the keys:
parentheses, with the literal key, as above, preceded by the name(s) parentheses, with the literal key, as above, preceded by the name(s)
of the modifiers, eg: [(control ?a)] of the modifiers, eg: [(control ?a)]
See the existing keys for examples." See the existing keys for examples."
:version "24.1"
:type 'allout-keybindings-binding :type 'allout-keybindings-binding
:group 'allout-keybindings :group 'allout-keybindings
:set 'allout-compose-and-institute-keymap :set 'allout-compose-and-institute-keymap
@ -402,6 +404,7 @@ else allout's special hanging-indent maintaining auto-fill function,
;;;_ = allout-inhibit-auto-fill-on-headline ;;;_ = allout-inhibit-auto-fill-on-headline
(defcustom allout-inhibit-auto-fill-on-headline nil (defcustom allout-inhibit-auto-fill-on-headline nil
"If non-nil, auto-fill will be inhibited while on topic's header line." "If non-nil, auto-fill will be inhibited while on topic's header line."
:version "24.1"
:type 'boolean :type 'boolean
:group 'allout) :group 'allout)
(make-variable-buffer-local 'allout-inhibit-auto-fill-on-headline) (make-variable-buffer-local 'allout-inhibit-auto-fill-on-headline)
@ -764,6 +767,7 @@ Set this var to the bullet you want to use for file cross-references."
"If non-nil, `allout-flatten-exposed-to-buffer' abbreviates topic "If non-nil, `allout-flatten-exposed-to-buffer' abbreviates topic
numbers to minimal amount with some context. Otherwise, entire numbers to minimal amount with some context. Otherwise, entire
numbers are always used." numbers are always used."
:version "24.1"
:type 'boolean :type 'boolean
:group 'allout) :group 'allout)

View file

@ -322,6 +322,7 @@ Archive and member name will be added."
"Program and its options to run in order to extract a 7z file member. "Program and its options to run in order to extract a 7z file member.
Extraction should happen to standard output. Archive and member name will Extraction should happen to standard output. Archive and member name will
be added." be added."
:version "24.1"
:type '(list (string :tag "Program") :type '(list (string :tag "Program")
(repeat :tag "Options" (repeat :tag "Options"
:inline t :inline t
@ -332,6 +333,7 @@ be added."
'("7z" "d") '("7z" "d")
"Program and its options to run in order to delete 7z file members. "Program and its options to run in order to delete 7z file members.
Archive and member names will be added." Archive and member names will be added."
:version "24.1"
:type '(list (string :tag "Program") :type '(list (string :tag "Program")
(repeat :tag "Options" (repeat :tag "Options"
:inline t :inline t
@ -343,6 +345,7 @@ Archive and member names will be added."
"Program and its options to run in order to update a 7z file member. "Program and its options to run in order to update a 7z file member.
Options should ensure that specified directory will be put into the 7z Options should ensure that specified directory will be put into the 7z
file. Archive and member name will be added." file. Archive and member name will be added."
:version "24.1"
:type '(list (string :tag "Program") :type '(list (string :tag "Program")
(repeat :tag "Options" (repeat :tag "Options"
:inline t :inline t

View file

@ -110,6 +110,7 @@ string are substituted as defined by the current value of the variable
(defcustom battery-mode-line-limit 100 (defcustom battery-mode-line-limit 100
"Percentage of full battery load below which display battery status" "Percentage of full battery load below which display battery status"
:version "24.1"
:type 'integer :type 'integer
:group 'battery) :group 'battery)

View file

@ -431,24 +431,28 @@ If `calc-show-selections' is non-nil, then selected sub-formulas are shown
by displaying the rest of the formula in `calc-nonselected-face'. by displaying the rest of the formula in `calc-nonselected-face'.
If `calc-show-selections' is nil, then selected sub-formulas are shown If `calc-show-selections' is nil, then selected sub-formulas are shown
by displaying the sub-formula in `calc-selected-face'." by displaying the sub-formula in `calc-selected-face'."
:version "24.1"
:group 'calc :group 'calc
:type 'boolean) :type 'boolean)
(defcustom calc-lu-field-reference (defcustom calc-lu-field-reference
"20 uPa" "20 uPa"
"The default reference level for logarithmic units (field)." "The default reference level for logarithmic units (field)."
:version "24.1"
:group 'calc :group 'calc
:type '(string)) :type '(string))
(defcustom calc-lu-power-reference (defcustom calc-lu-power-reference
"mW" "mW"
"The default reference level for logarithmic units (power)." "The default reference level for logarithmic units (power)."
:version "24.1"
:group 'calc :group 'calc
:type '(string)) :type '(string))
(defcustom calc-note-threshold "1" (defcustom calc-note-threshold "1"
"The number of cents that a frequency should be near a note "The number of cents that a frequency should be near a note
to be identified as that note." to be identified as that note."
:version "24.1"
:type 'string :type 'string
:group 'calc) :group 'calc)

View file

@ -521,6 +521,7 @@ It includes all faces in list FACES."
(defcustom custom-theme-allow-multiple-selections nil (defcustom custom-theme-allow-multiple-selections nil
"Whether to allow multi-selections in the *Custom Themes* buffer." "Whether to allow multi-selections in the *Custom Themes* buffer."
:version "24.1"
:type 'boolean :type 'boolean
:group 'custom-buffer) :group 'custom-buffer)

View file

@ -172,6 +172,7 @@ files and lock files."
(defcustom dired-omit-verbose t (defcustom dired-omit-verbose t
"When non-nil, show messages when omitting files. "When non-nil, show messages when omitting files.
When nil, don't show messages." When nil, don't show messages."
:version "24.1"
:type 'boolean :type 'boolean
:group 'dired-x) :group 'dired-x)

View file

@ -172,6 +172,7 @@ Higher values result in larger images."
(defcustom doc-view-image-width 850 (defcustom doc-view-image-width 850
"Default image width. "Default image width.
Has only an effect if imagemagick support is compiled into emacs." Has only an effect if imagemagick support is compiled into emacs."
:version "24.1"
:type 'number :type 'number
:group 'doc-view) :group 'doc-view)
@ -201,6 +202,7 @@ If this and `doc-view-dvipdfm-program' are set,
"Program to convert any file type readable by OpenOffice.org to PDF. "Program to convert any file type readable by OpenOffice.org to PDF.
Needed for viewing OpenOffice.org (and MS Office) files." Needed for viewing OpenOffice.org (and MS Office) files."
:version "24.1"
:type 'file :type 'file
:group 'doc-view) :group 'doc-view)

View file

@ -104,6 +104,7 @@ If non-nil, alignment is done with the first keyword
\(defun foo (arg1 arg2 &rest rest \(defun foo (arg1 arg2 &rest rest
&key key1 key2) &key key1 key2)
#|...|#)" #|...|#)"
:version "24.1"
:type 'boolean :type 'boolean
:group 'lisp-indent) :group 'lisp-indent)
@ -111,6 +112,7 @@ If non-nil, alignment is done with the first keyword
"Indentation of lambda list keyword parameters. "Indentation of lambda list keyword parameters.
See `lisp-lambda-list-keyword-parameter-alignment' See `lisp-lambda-list-keyword-parameter-alignment'
for more information." for more information."
:version "24.1"
:type 'integer :type 'integer
:group 'lisp-indent) :group 'lisp-indent)
@ -130,6 +132,7 @@ If non-nil, alignment is done with the first parameter
\(defun foo (arg1 arg2 &key key1 key2 \(defun foo (arg1 arg2 &key key1 key2
key3 key4) key3 key4)
#|...|#)" #|...|#)"
:version "24.1"
:type 'boolean :type 'boolean
:group 'lisp-indent) :group 'lisp-indent)

View file

@ -61,6 +61,7 @@ properties to colorize its output based on the setting of
"How to display time information in `eshell-ls-file'. "How to display time information in `eshell-ls-file'.
This is passed to `format-time-string' as a format string. This is passed to `format-time-string' as a format string.
To display the date using the current locale, use \"%b \%e\"." To display the date using the current locale, use \"%b \%e\"."
:version "24.1"
:type 'string :type 'string
:group 'eshell-ls) :group 'eshell-ls)

View file

@ -1,3 +1,25 @@
2012-02-11 Glenn Morris <rgm@gnu.org>
* sieve-manage.el (sieve-manage-default-stream):
* shr.el (shr):
* nnir.el (nnir-ignored-newsgroups, nnir-summary-line-format)
(nnir-retrieve-headers-override-function)
(nnir-imap-default-search-key, nnir-notmuch-program)
(nnir-notmuch-additional-switches, nnir-notmuch-remove-prefix)
(nnir-method-default-engines):
* message.el (message-cite-reply-position):
* gssapi.el (gssapi-program):
* gravatar.el (gravatar):
* gnus-sum.el (gnus-refer-thread-use-nnir):
* gnus-registry.el (gnus-registry-unfollowed-addresses)
(gnus-registry-max-pruned-entries):
* gnus-picon.el (gnus-picon-inhibit-top-level-domains):
* gnus-int.el (gnus-after-set-mark-hook)
(gnus-before-update-mark-hook):
* gnus-async.el (gnus-async-post-fetch-function):
* auth-source.el (auth-source-cache-expiry):
Add missing :version tags to new defcustoms and defgroups.
2012-02-10 Lars Ingebrigtsen <larsi@gnus.org> 2012-02-10 Lars Ingebrigtsen <larsi@gnus.org>
* message.el (message-default-send-mail-function): Made into own * message.el (message-default-send-mail-function): Made into own

View file

@ -84,6 +84,7 @@
"How many seconds passwords are cached, or nil to disable "How many seconds passwords are cached, or nil to disable
expiring. Overrides `password-cache-expiry' through a expiring. Overrides `password-cache-expiry' through a
let-binding." let-binding."
:version "24.1"
:group 'auth-source :group 'auth-source
:type '(choice (const :tag "Never" nil) :type '(choice (const :tag "Never" nil)
(const :tag "All Day" 86400) (const :tag "All Day" 86400)

View file

@ -74,6 +74,7 @@ It should return non-nil if the article is to be prefetched."
"Function called after an article has been prefetched. "Function called after an article has been prefetched.
The function will be called narrowed to the region of the article The function will be called narrowed to the region of the article
that was fetched." that was fetched."
:version "24.1"
:group 'gnus-asynchronous :group 'gnus-asynchronous
:type 'function) :type 'function)

View file

@ -43,11 +43,13 @@
(defcustom gnus-after-set-mark-hook nil (defcustom gnus-after-set-mark-hook nil
"Hook called just after marks are set in a group." "Hook called just after marks are set in a group."
:version "24.1"
:group 'gnus-start :group 'gnus-start
:type 'hook) :type 'hook)
(defcustom gnus-before-update-mark-hook nil (defcustom gnus-before-update-mark-hook nil
"Hook called just before marks are updated in a group." "Hook called just before marks are updated in a group."
:version "24.1"
:group 'gnus-start :group 'gnus-start
:type 'hook) :type 'hook)

View file

@ -87,6 +87,7 @@ added right to the textual representation."
(defcustom gnus-picon-inhibit-top-level-domains t (defcustom gnus-picon-inhibit-top-level-domains t
"If non-nil, don't piconify top-level domains. "If non-nil, don't piconify top-level domains.
These are often not very interesting." These are often not very interesting."
:version "24.1"
:type 'boolean :type 'boolean
:group 'gnus-picon) :group 'gnus-picon)

View file

@ -142,6 +142,7 @@ display.")
The addresses are matched, they don't have to be fully qualified. The addresses are matched, they don't have to be fully qualified.
In the messages, these addresses can be the sender or the In the messages, these addresses can be the sender or the
recipients." recipients."
:version "24.1"
:group 'gnus-registry :group 'gnus-registry
:type '(repeat regexp)) :type '(repeat regexp))
@ -243,6 +244,7 @@ the Bit Bucket."
(defcustom gnus-registry-max-pruned-entries nil (defcustom gnus-registry-max-pruned-entries nil
"Maximum number of pruned entries in the registry, nil for unlimited." "Maximum number of pruned entries in the registry, nil for unlimited."
:version "24.1"
:group 'gnus-registry :group 'gnus-registry
:type '(radio (const :format "Unlimited " nil) :type '(radio (const :format "Unlimited " nil)
(integer :format "Maximum number: %v"))) (integer :format "Maximum number: %v")))

View file

@ -122,6 +122,7 @@ If t, fetch all the available old headers."
"*Use nnir to search an entire server when referring threads. A "*Use nnir to search an entire server when referring threads. A
nil value will only search for thread-related articles in the nil value will only search for thread-related articles in the
current group." current group."
:version "24.1"
:group 'gnus-thread :group 'gnus-thread
:type 'boolean) :type 'boolean)

View file

@ -29,6 +29,7 @@
(defgroup gravatar nil (defgroup gravatar nil
"Gravatar." "Gravatar."
:version "24.1"
:group 'comm) :group 'comm)
(defcustom gravatar-automatic-caching t (defcustom gravatar-automatic-caching t

View file

@ -37,6 +37,7 @@
and %l with the user name. The program should accept commands on and %l with the user name. The program should accept commands on
stdin and return responses to stdout. Each entry in the list is stdin and return responses to stdout. Each entry in the list is
tried until a successful connection is made." tried until a successful connection is made."
:version "24.1"
:group 'network :group 'network
:type '(repeat string)) :type '(repeat string))

View file

@ -1095,6 +1095,7 @@ probably want to set this variable only for specific groups,
e.g. using `gnus-posting-styles': e.g. using `gnus-posting-styles':
(eval (set (make-local-variable 'message-cite-reply-position) 'above))" (eval (set (make-local-variable 'message-cite-reply-position) 'above))"
:version "24.1"
:type '(choice (const :tag "Reply inline" 'traditional) :type '(choice (const :tag "Reply inline" 'traditional)
(const :tag "Reply above" 'above) (const :tag "Reply above" 'above)
(const :tag "Reply below" 'below)) (const :tag "Reply below" 'below))

View file

@ -310,6 +310,7 @@ is `(valuefunc member)'."
(defcustom nnir-ignored-newsgroups "" (defcustom nnir-ignored-newsgroups ""
"*A regexp to match newsgroups in the active file that should "*A regexp to match newsgroups in the active file that should
be skipped when searching." be skipped when searching."
:version "24.1"
:type '(regexp) :type '(regexp)
:group 'nnir) :group 'nnir)
@ -324,6 +325,7 @@ with three items unique to nnir summary buffers:
%g Article original short group name (string) %g Article original short group name (string)
If nil this will use `gnus-summary-line-format'." If nil this will use `gnus-summary-line-format'."
:version "24.1"
:type '(string) :type '(string)
:group 'nnir) :group 'nnir)
@ -335,6 +337,7 @@ retrieved header format.
If this variable is nil, or if the provided function returns nil for a search If this variable is nil, or if the provided function returns nil for a search
result, `gnus-retrieve-headers' will be called instead." result, `gnus-retrieve-headers' will be called instead."
:version "24.1"
:type '(function) :type '(function)
:group 'nnir) :group 'nnir)
@ -342,6 +345,7 @@ result, `gnus-retrieve-headers' will be called instead."
"*The default IMAP search key for an nnir search. Must be one of "*The default IMAP search key for an nnir search. Must be one of
the keys in `nnir-imap-search-arguments'. To use raw imap queries the keys in `nnir-imap-search-arguments'. To use raw imap queries
by default set this to \"Imap\"." by default set this to \"Imap\"."
:version "24.1"
:type `(choice ,@(mapcar (lambda (elem) (list 'const (car elem))) :type `(choice ,@(mapcar (lambda (elem) (list 'const (car elem)))
nnir-imap-search-arguments)) nnir-imap-search-arguments))
:group 'nnir) :group 'nnir)
@ -503,6 +507,7 @@ arrive at the correct group name, \"mail.misc\"."
(defcustom nnir-notmuch-program "notmuch" (defcustom nnir-notmuch-program "notmuch"
"*Name of notmuch search executable." "*Name of notmuch search executable."
:version "24.1"
:type '(string) :type '(string)
:group 'nnir) :group 'nnir)
@ -513,6 +518,7 @@ Note that this should be a list. Ie, do NOT use the following:
(setq nnir-notmuch-additional-switches \"-i -w\") ; wrong (setq nnir-notmuch-additional-switches \"-i -w\") ; wrong
Instead, use this: Instead, use this:
(setq nnir-notmuch-additional-switches '(\"-i\" \"-w\"))" (setq nnir-notmuch-additional-switches '(\"-i\" \"-w\"))"
:version "24.1"
:type '(repeat (string)) :type '(repeat (string))
:group 'nnir) :group 'nnir)
@ -523,6 +529,7 @@ regular expression.
This variable is very similar to `nnir-namazu-remove-prefix', except This variable is very similar to `nnir-namazu-remove-prefix', except
that it is for notmuch, not Namazu." that it is for notmuch, not Namazu."
:version "24.1"
:type '(regexp) :type '(regexp)
:group 'nnir) :group 'nnir)
@ -573,6 +580,7 @@ Add an entry here when adding a new search engine.")
'((nnimap . imap) '((nnimap . imap)
(nntp . gmane)) (nntp . gmane))
"*Alist of default search engines keyed by server method." "*Alist of default search engines keyed by server method."
:version "24.1"
:type `(repeat (cons (choice (const nnimap) (const nttp) (const nnspool) :type `(repeat (cons (choice (const nnimap) (const nttp) (const nnspool)
(const nneething) (const nndir) (const nnmbox) (const nneething) (const nndir) (const nnmbox)
(const nnml) (const nnmh) (const nndraft) (const nnml) (const nnmh) (const nndraft)

View file

@ -35,6 +35,7 @@
(defgroup shr nil (defgroup shr nil
"Simple HTML Renderer" "Simple HTML Renderer"
:version "24.1"
:group 'mail) :group 'mail)
(defcustom shr-max-image-proportion 0.9 (defcustom shr-max-image-proportion 0.9

View file

@ -157,6 +157,7 @@ for doing the actual authentication."
(defcustom sieve-manage-default-stream 'network (defcustom sieve-manage-default-stream 'network
"Default stream type to use for `sieve-manage'. "Default stream type to use for `sieve-manage'.
Must be a name of a stream in `sieve-manage-stream-alist'." Must be a name of a stream in `sieve-manage-stream-alist'."
:version "24.1"
:type 'symbol :type 'symbol
:group 'sieve-manage) :group 'sieve-manage)

View file

@ -1372,7 +1372,7 @@ METHOD must be one of these symbols:
`acronym': display an acronym of the character in a box. The `acronym': display an acronym of the character in a box. The
acronym is taken from `char-acronym-table', which see. acronym is taken from `char-acronym-table', which see.
`hex-code': display the hexadecimal character code in a box." `hex-code': display the hexadecimal character code in a box."
:version "24.1"
:type '(alist :key-type (symbol :tag "Character Group") :type '(alist :key-type (symbol :tag "Character Group")
:value-type (symbol :tag "Display Method")) :value-type (symbol :tag "Display Method"))
:options '((c0-control :options '((c0-control

View file

@ -428,6 +428,7 @@ any other non-nil value, take the action in both cases. Even if
you're not confirming the sending of immediate or queued messages, you're not confirming the sending of immediate or queued messages,
it can still be interesting to see a lot about them as they are it can still be interesting to see a lot about them as they are
shuttled robotically onward." shuttled robotically onward."
:version "24.1"
:group 'feedmail-misc :group 'feedmail-misc
:type 'boolean :type 'boolean
) )

View file

@ -224,6 +224,7 @@ the associated section number."
(defcustom Man-name-local-regexp (concat "^" (regexp-opt '("NOM" "NAME")) "$") (defcustom Man-name-local-regexp (concat "^" (regexp-opt '("NOM" "NAME")) "$")
"Regexp that matches the text that precedes the command's name. "Regexp that matches the text that precedes the command's name.
Used in `bookmark-set' to get the default bookmark name." Used in `bookmark-set' to get the default bookmark name."
:version "24.1"
:type 'string :group 'bookmark) :type 'string :group 'bookmark)
(defvar manual-program "man" (defvar manual-program "man"

View file

@ -510,6 +510,7 @@ Each override has the shape (CATEGORY . ALIST) where ALIST is
an association list that can specify properties such as: an association list that can specify properties such as:
- `styles': the list of `completion-styles' to use for that category. - `styles': the list of `completion-styles' to use for that category.
- `cycle': the `completion-cycle-threshold' to use for that category." - `cycle': the `completion-cycle-threshold' to use for that category."
:version "24.1"
:type `(alist :key-type (choice :tag "Category" :type `(alist :key-type (choice :tag "Category"
(const buffer) (const buffer)
(const file) (const file)
@ -612,6 +613,7 @@ If nil, cycling is never used.
If t, cycling is always used. If t, cycling is always used.
If an integer, cycling is used as soon as there are fewer completion If an integer, cycling is used as soon as there are fewer completion
candidates than this number." candidates than this number."
:version "24.1"
:type completion--cycling-threshold-type) :type completion--cycling-threshold-type)
(defun completion--cycle-threshold (metadata) (defun completion--cycle-threshold (metadata)
@ -2310,6 +2312,7 @@ Those chars are treated as delimiters iff this variable is non-nil.
I.e. if non-nil, M-x SPC will just insert a \"-\" in the minibuffer, whereas I.e. if non-nil, M-x SPC will just insert a \"-\" in the minibuffer, whereas
if nil, it will list all possible commands in *Completions* because none of if nil, it will list all possible commands in *Completions* because none of
the commands start with a \"-\" or a SPC." the commands start with a \"-\" or a SPC."
:version "24.1"
:type 'boolean) :type 'boolean)
(defun completion-pcm--pattern-trivial-p (pattern) (defun completion-pcm--pattern-trivial-p (pattern)

View file

@ -39,6 +39,7 @@
(defgroup gnutls nil (defgroup gnutls nil
"Emacs interface to the GnuTLS library." "Emacs interface to the GnuTLS library."
:version "24.1"
:prefix "gnutls-" :prefix "gnutls-"
:group 'net-utils) :group 'net-utils)

View file

@ -39,6 +39,7 @@
(defcustom netrc-file "~/.authinfo" (defcustom netrc-file "~/.authinfo"
"File where user credentials are stored." "File where user credentials are stored."
:version "24.1"
:type 'file :type 'file
:group 'netrc) :group 'netrc)

View file

@ -55,6 +55,7 @@
(defgroup soap-client nil (defgroup soap-client nil
"Access SOAP web services from Emacs." "Access SOAP web services from Emacs."
:version "24.1"
:group 'tools) :group 'tools)
;;;; Support for parsing XML documents with namespaces ;;;; Support for parsing XML documents with namespaces

View file

@ -181,6 +181,7 @@ See the variable `tramp-encoding-shell' for more information."
(unless (string-match "cmd\\.exe" tramp-encoding-shell) "-i") (unless (string-match "cmd\\.exe" tramp-encoding-shell) "-i")
"*Use this switch together with `tramp-encoding-shell' for interactive shells. "*Use this switch together with `tramp-encoding-shell' for interactive shells.
See the variable `tramp-encoding-shell' for more information." See the variable `tramp-encoding-shell' for more information."
:version "24.1"
:group 'tramp :group 'tramp
:type '(choice (const nil) string)) :type '(choice (const nil) string))
@ -463,6 +464,7 @@ the remote shell.")
(defcustom tramp-local-end-of-line (defcustom tramp-local-end-of-line
(if (memq system-type '(windows-nt)) "\r\n" "\n") (if (memq system-type '(windows-nt)) "\r\n" "\n")
"*String used for end of line in local processes." "*String used for end of line in local processes."
:version "24.1"
:group 'tramp :group 'tramp
:type 'string) :type 'string)

View file

@ -349,6 +349,7 @@ Its value is one of:
go-outward -- Nested functions are also recognized. Should a function go-outward -- Nested functions are also recognized. Should a function
command hit the beginning/end of a nested scope, it will command hit the beginning/end of a nested scope, it will
carry on at the less nested level." carry on at the less nested level."
:version "24.1"
:type '(radio :type '(radio
(const :tag "Functions are at the top-level" t) (const :tag "Functions are at the top-level" t)
(const :tag "Functions are also recognized inside declaration scopes" go-outward)) (const :tag "Functions are also recognized inside declaration scopes" go-outward))

View file

@ -341,6 +341,7 @@ mercury - Mercury
sicstus - SICStus Prolog sicstus - SICStus Prolog
swi - SWI Prolog swi - SWI Prolog
gnu - GNU Prolog" gnu - GNU Prolog"
:version "24.1"
:group 'prolog :group 'prolog
:type '(choice (const :tag "SICStus" :value sicstus) :type '(choice (const :tag "SICStus" :value sicstus)
(const :tag "SWI Prolog" :value swi) (const :tag "SWI Prolog" :value swi)
@ -363,6 +364,7 @@ gnu - GNU Prolog"
;; FIXME: This should be auto-detected instead of user-provided. ;; FIXME: This should be auto-detected instead of user-provided.
"Alist of Prolog system versions. "Alist of Prolog system versions.
The version numbers are of the format (Major . Minor)." The version numbers are of the format (Major . Minor)."
:version "24.1"
:type '(repeat (list (symbol :tag "System") :type '(repeat (list (symbol :tag "System")
(cons :tag "Version numbers" (integer :tag "Major") (cons :tag "Version numbers" (integer :tag "Major")
(integer :tag "Minor")))) (integer :tag "Minor"))))
@ -377,24 +379,28 @@ The version numbers are of the format (Major . Minor)."
(defcustom prolog-align-comments-flag t (defcustom prolog-align-comments-flag t
"Non-nil means automatically align comments when indenting." "Non-nil means automatically align comments when indenting."
:version "24.1"
:group 'prolog-indentation :group 'prolog-indentation
:type 'boolean) :type 'boolean)
(defcustom prolog-indent-mline-comments-flag t (defcustom prolog-indent-mline-comments-flag t
"Non-nil means indent contents of /* */ comments. "Non-nil means indent contents of /* */ comments.
Otherwise leave such lines as they are." Otherwise leave such lines as they are."
:version "24.1"
:group 'prolog-indentation :group 'prolog-indentation
:type 'boolean) :type 'boolean)
(defcustom prolog-object-end-to-0-flag t (defcustom prolog-object-end-to-0-flag t
"Non-nil means indent closing '}' in SICStus object definitions to level 0. "Non-nil means indent closing '}' in SICStus object definitions to level 0.
Otherwise indent to `prolog-indent-width'." Otherwise indent to `prolog-indent-width'."
:version "24.1"
:group 'prolog-indentation :group 'prolog-indentation
:type 'boolean) :type 'boolean)
(defcustom prolog-left-indent-regexp "\\(;\\|\\*?->\\)" (defcustom prolog-left-indent-regexp "\\(;\\|\\*?->\\)"
"Regexp for character sequences after which next line is indented. "Regexp for character sequences after which next line is indented.
Next line after such a regexp is indented to the opening parenthesis level." Next line after such a regexp is indented to the opening parenthesis level."
:version "24.1"
:group 'prolog-indentation :group 'prolog-indentation
:type 'regexp) :type 'regexp)
@ -404,12 +410,14 @@ The second and subsequent line in a parenthesis expression other than
a compound term can either be indented `prolog-paren-indent' to the a compound term can either be indented `prolog-paren-indent' to the
right (if this variable is non-nil) or in the same way as for compound right (if this variable is non-nil) or in the same way as for compound
terms (if this variable is nil, default)." terms (if this variable is nil, default)."
:version "24.1"
:group 'prolog-indentation :group 'prolog-indentation
:type 'boolean) :type 'boolean)
(defcustom prolog-paren-indent 4 (defcustom prolog-paren-indent 4
"The indentation increase for parenthesis expressions. "The indentation increase for parenthesis expressions.
Only used in ( If -> Then ; Else) and ( Disj1 ; Disj2 ) style expressions." Only used in ( If -> Then ; Else) and ( Disj1 ; Disj2 ) style expressions."
:version "24.1"
:group 'prolog-indentation :group 'prolog-indentation
:type 'integer) :type 'integer)
@ -421,6 +429,7 @@ Legal values:
problems detecting multiline /* */ comments. problems detecting multiline /* */ comments.
'beg-of-clause - starts parsing at the beginning of the current clause. 'beg-of-clause - starts parsing at the beginning of the current clause.
Slow, but copes better with /* */ comments." Slow, but copes better with /* */ comments."
:version "24.1"
:group 'prolog-indentation :group 'prolog-indentation
:type '(choice (const :value beg-of-line) :type '(choice (const :value beg-of-line)
(const :value beg-of-clause))) (const :value beg-of-clause)))
@ -451,6 +460,7 @@ Legal values:
;; FIXME: Shouldn't we just use the union of all the above here? ;; FIXME: Shouldn't we just use the union of all the above here?
("dynamic" "module"))) ("dynamic" "module")))
"Alist of Prolog keywords which is used for font locking of directives." "Alist of Prolog keywords which is used for font locking of directives."
:version "24.1"
:group 'prolog-font-lock :group 'prolog-font-lock
:type 'sexp) :type 'sexp)
@ -459,6 +469,7 @@ Legal values:
("char" "float" "int" "io__state" "string" "univ")) ("char" "float" "int" "io__state" "string" "univ"))
(t nil)) (t nil))
"Alist of Prolog types used by font locking." "Alist of Prolog types used by font locking."
:version "24.1"
:group 'prolog-font-lock :group 'prolog-font-lock
:type 'sexp) :type 'sexp)
@ -467,6 +478,7 @@ Legal values:
("bound" "di" "free" "ground" "in" "mdi" "mui" "muo" "out" "ui" "uo")) ("bound" "di" "free" "ground" "in" "mdi" "mui" "muo" "out" "ui" "uo"))
(t nil)) (t nil))
"Alist of Prolog mode specificators used by font locking." "Alist of Prolog mode specificators used by font locking."
:version "24.1"
:group 'prolog-font-lock :group 'prolog-font-lock
:type 'sexp) :type 'sexp)
@ -476,6 +488,7 @@ Legal values:
"semidet")) "semidet"))
(t nil)) (t nil))
"Alist of Prolog determinism specificators used by font locking." "Alist of Prolog determinism specificators used by font locking."
:version "24.1"
:group 'prolog-font-lock :group 'prolog-font-lock
:type 'sexp) :type 'sexp)
@ -484,6 +497,7 @@ Legal values:
("^#[0-9]+")) ("^#[0-9]+"))
(t nil)) (t nil))
"Alist of Prolog source code directives used by font locking." "Alist of Prolog source code directives used by font locking."
:version "24.1"
:group 'prolog-font-lock :group 'prolog-font-lock
:type 'sexp) :type 'sexp)
@ -492,11 +506,13 @@ Legal values:
(defcustom prolog-electric-newline-flag (not (fboundp 'electric-indent-mode)) (defcustom prolog-electric-newline-flag (not (fboundp 'electric-indent-mode))
"Non-nil means automatically indent the next line when the user types RET." "Non-nil means automatically indent the next line when the user types RET."
:version "24.1"
:group 'prolog-keyboard :group 'prolog-keyboard
:type 'boolean) :type 'boolean)
(defcustom prolog-hungry-delete-key-flag nil (defcustom prolog-hungry-delete-key-flag nil
"Non-nil means delete key consumes all preceding spaces." "Non-nil means delete key consumes all preceding spaces."
:version "24.1"
:group 'prolog-keyboard :group 'prolog-keyboard
:type 'boolean) :type 'boolean)
@ -509,6 +525,7 @@ If dot is pressed at the beginning of an empty line, it inserts the head
of a new clause for the current predicate. It does not apply in strings of a new clause for the current predicate. It does not apply in strings
and comments. and comments.
It does not apply in strings and comments." It does not apply in strings and comments."
:version "24.1"
:group 'prolog-keyboard :group 'prolog-keyboard
:type 'boolean) :type 'boolean)
@ -517,6 +534,7 @@ It does not apply in strings and comments."
for recursive calls or new clause heads. Non-nil means to also for recursive calls or new clause heads. Non-nil means to also
insert enough commas to cover the predicate's arity and `)', insert enough commas to cover the predicate's arity and `)',
and dot and newline for recursive calls." and dot and newline for recursive calls."
:version "24.1"
:group 'prolog-keyboard :group 'prolog-keyboard
:type 'boolean) :type 'boolean)
@ -524,6 +542,7 @@ and dot and newline for recursive calls."
"Non-nil means make underscore key electric. "Non-nil means make underscore key electric.
Electric underscore replaces the current variable with underscore. Electric underscore replaces the current variable with underscore.
If underscore is pressed not on a variable then it behaves as usual." If underscore is pressed not on a variable then it behaves as usual."
:version "24.1"
:group 'prolog-keyboard :group 'prolog-keyboard
:type 'boolean) :type 'boolean)
@ -531,12 +550,14 @@ If underscore is pressed not on a variable then it behaves as usual."
"Non-nil means make TAB key electric. "Non-nil means make TAB key electric.
Electric TAB inserts spaces after parentheses, ->, and ; Electric TAB inserts spaces after parentheses, ->, and ;
in ( If -> Then ; Else) and ( Disj1 ; Disj2 ) style expressions." in ( If -> Then ; Else) and ( Disj1 ; Disj2 ) style expressions."
:version "24.1"
:group 'prolog-keyboard :group 'prolog-keyboard
:type 'boolean) :type 'boolean)
(defcustom prolog-electric-if-then-else-flag nil (defcustom prolog-electric-if-then-else-flag nil
"Non-nil makes `(', `>' and `;' electric "Non-nil makes `(', `>' and `;' electric
to automatically indent if-then-else constructs." to automatically indent if-then-else constructs."
:version "24.1"
:group 'prolog-keyboard :group 'prolog-keyboard
:type 'boolean) :type 'boolean)
@ -544,6 +565,7 @@ to automatically indent if-then-else constructs."
"Makes `:' electric (inserts `:-' on a new line). "Makes `:' electric (inserts `:-' on a new line).
If non-nil, pressing `:' at the end of a line that starts in If non-nil, pressing `:' at the end of a line that starts in
the first column (i.e., clause heads) inserts ` :-' and newline." the first column (i.e., clause heads) inserts ` :-' and newline."
:version "24.1"
:group 'prolog-keyboard :group 'prolog-keyboard
:type 'boolean) :type 'boolean)
@ -551,11 +573,13 @@ the first column (i.e., clause heads) inserts ` :-' and newline."
"Makes `-' electric (inserts a `-->' on a new line). "Makes `-' electric (inserts a `-->' on a new line).
If non-nil, pressing `-' at the end of a line that starts in If non-nil, pressing `-' at the end of a line that starts in
the first column (i.e., DCG heads) inserts ` -->' and newline." the first column (i.e., DCG heads) inserts ` -->' and newline."
:version "24.1"
:group 'prolog-keyboard :group 'prolog-keyboard
:type 'boolean) :type 'boolean)
(defcustom prolog-old-sicstus-keys-flag nil (defcustom prolog-old-sicstus-keys-flag nil
"Non-nil means old SICStus Prolog mode keybindings are used." "Non-nil means old SICStus Prolog mode keybindings are used."
:version "24.1"
:group 'prolog-keyboard :group 'prolog-keyboard
:type 'boolean) :type 'boolean)
@ -583,6 +607,7 @@ the first column (i.e., DCG heads) inserts ` -->' and newline."
'((sicstus ("-i")) '((sicstus ("-i"))
(t nil)) (t nil))
"Alist of switches given to inferior Prolog run with `run-prolog'." "Alist of switches given to inferior Prolog run with `run-prolog'."
:version "24.1"
:group 'prolog-inferior :group 'prolog-inferior
:type 'sexp) :type 'sexp)
(defun prolog-program-switches () (defun prolog-program-switches ()
@ -649,6 +674,7 @@ nil means send actual operating system end of file."
(gnu "^| \\?-") (gnu "^| \\?-")
(t "^|? *\\?-")) (t "^|? *\\?-"))
"Alist of prompts of the prolog system command line." "Alist of prompts of the prolog system command line."
:version "24.1"
:group 'prolog-inferior :group 'prolog-inferior
:type 'sexp) :type 'sexp)
(defun prolog-prompt-regexp () (defun prolog-prompt-regexp ()
@ -663,31 +689,37 @@ nil means send actual operating system end of file."
(defcustom prolog-debug-on-string "debug.\n" (defcustom prolog-debug-on-string "debug.\n"
"Predicate for enabling debug mode." "Predicate for enabling debug mode."
:version "24.1"
:group 'prolog-inferior :group 'prolog-inferior
:type 'string) :type 'string)
(defcustom prolog-debug-off-string "nodebug.\n" (defcustom prolog-debug-off-string "nodebug.\n"
"Predicate for disabling debug mode." "Predicate for disabling debug mode."
:version "24.1"
:group 'prolog-inferior :group 'prolog-inferior
:type 'string) :type 'string)
(defcustom prolog-trace-on-string "trace.\n" (defcustom prolog-trace-on-string "trace.\n"
"Predicate for enabling tracing." "Predicate for enabling tracing."
:version "24.1"
:group 'prolog-inferior :group 'prolog-inferior
:type 'string) :type 'string)
(defcustom prolog-trace-off-string "notrace.\n" (defcustom prolog-trace-off-string "notrace.\n"
"Predicate for disabling tracing." "Predicate for disabling tracing."
:version "24.1"
:group 'prolog-inferior :group 'prolog-inferior
:type 'string) :type 'string)
(defcustom prolog-zip-on-string "zip.\n" (defcustom prolog-zip-on-string "zip.\n"
"Predicate for enabling zip mode for SICStus." "Predicate for enabling zip mode for SICStus."
:version "24.1"
:group 'prolog-inferior :group 'prolog-inferior
:type 'string) :type 'string)
(defcustom prolog-zip-off-string "nozip.\n" (defcustom prolog-zip-off-string "nozip.\n"
"Predicate for disabling zip mode for SICStus." "Predicate for disabling zip mode for SICStus."
:version "24.1"
:group 'prolog-inferior :group 'prolog-inferior
:type 'string) :type 'string)
@ -701,6 +733,7 @@ jumping to the source code responsible for the error.
Warning: the new method is so far only experimental and Warning: the new method is so far only experimental and
does contain bugs. The recommended setting for the novice user does contain bugs. The recommended setting for the novice user
is non-nil for this variable." is non-nil for this variable."
:version "24.1"
:group 'prolog-inferior :group 'prolog-inferior
:type 'boolean) :type 'boolean)
@ -711,39 +744,46 @@ is non-nil for this variable."
(not (fboundp 'syntax-propertize-rules)) (not (fboundp 'syntax-propertize-rules))
"Non-nil means use the internal prolog tokenizer for indentation etc. "Non-nil means use the internal prolog tokenizer for indentation etc.
Otherwise use `parse-partial-sexp' which is faster but sometimes incorrect." Otherwise use `parse-partial-sexp' which is faster but sometimes incorrect."
:version "24.1"
:group 'prolog-other :group 'prolog-other
:type 'boolean) :type 'boolean)
(defcustom prolog-imenu-flag t (defcustom prolog-imenu-flag t
"Non-nil means add a clause index menu for all prolog files." "Non-nil means add a clause index menu for all prolog files."
:version "24.1"
:group 'prolog-other :group 'prolog-other
:type 'boolean) :type 'boolean)
(defcustom prolog-imenu-max-lines 3000 (defcustom prolog-imenu-max-lines 3000
"The maximum number of lines of the file for imenu to be enabled. "The maximum number of lines of the file for imenu to be enabled.
Relevant only when `prolog-imenu-flag' is non-nil." Relevant only when `prolog-imenu-flag' is non-nil."
:version "24.1"
:group 'prolog-other :group 'prolog-other
:type 'integer) :type 'integer)
(defcustom prolog-info-predicate-index (defcustom prolog-info-predicate-index
"(sicstus)Predicate Index" "(sicstus)Predicate Index"
"The info node for the SICStus predicate index." "The info node for the SICStus predicate index."
:version "24.1"
:group 'prolog-other :group 'prolog-other
:type 'string) :type 'string)
(defcustom prolog-underscore-wordchar-flag nil (defcustom prolog-underscore-wordchar-flag nil
"Non-nil means underscore (_) is a word-constituent character." "Non-nil means underscore (_) is a word-constituent character."
:version "24.1"
:group 'prolog-other :group 'prolog-other
:type 'boolean) :type 'boolean)
(defcustom prolog-use-sicstus-sd nil (defcustom prolog-use-sicstus-sd nil
"If non-nil, use the source level debugger of SICStus 3#7 and later." "If non-nil, use the source level debugger of SICStus 3#7 and later."
:version "24.1"
:group 'prolog-other :group 'prolog-other
:type 'boolean) :type 'boolean)
(defcustom prolog-char-quote-workaround nil (defcustom prolog-char-quote-workaround nil
"If non-nil, declare 0 as a quote character to handle 0'<char>. "If non-nil, declare 0 as a quote character to handle 0'<char>.
This is really kludgy, and unneeded (i.e. obsolete) in Emacs>=24." This is really kludgy, and unneeded (i.e. obsolete) in Emacs>=24."
:version "24.1"
:group 'prolog-other :group 'prolog-other
:type 'boolean) :type 'boolean)

View file

@ -810,6 +810,7 @@ is changed."
This hook is invoked in a buffer once it is ready to accept input This hook is invoked in a buffer once it is ready to accept input
for the first time." for the first time."
:version "24.1"
:type 'hook :type 'hook
:group 'SQL) :group 'SQL)
@ -825,6 +826,7 @@ for the first time."
All products share this list; products should define a regexp to All products share this list; products should define a regexp to
identify additional keywords in a variable defined by identify additional keywords in a variable defined by
the :statement feature." the :statement feature."
:version "24.1"
:type 'string :type 'string
:group 'SQL) :group 'SQL)
@ -856,6 +858,7 @@ You will find the file in your Orant\\bin directory."
(defcustom sql-oracle-statement-starters (defcustom sql-oracle-statement-starters
(regexp-opt '("declare" "begin" "with")) (regexp-opt '("declare" "begin" "with"))
"Additional statement starting keywords in Oracle." "Additional statement starting keywords in Oracle."
:version "24.1"
:type 'string :type 'string
:group 'SQL) :group 'SQL)
@ -872,6 +875,7 @@ You need to issue the following command in SQL*Plus to be safe:
SET DEFINE OFF SET DEFINE OFF
In older versions of SQL*Plus, this was the SET SCAN OFF command." In older versions of SQL*Plus, this was the SET SCAN OFF command."
:version "24.1"
:type 'boolean :type 'boolean
:group 'SQL) :group 'SQL)

View file

@ -689,6 +689,7 @@ file referenced. If false, this is not supported."
Set this to \"wire\" if the Verilog code uses \"`default_nettype Set this to \"wire\" if the Verilog code uses \"`default_nettype
none\". Note using `default_nettype none isn't recommended practice; this none\". Note using `default_nettype none isn't recommended practice; this
mode is experimental." mode is experimental."
:version "24.1"
:group 'verilog-mode-actions :group 'verilog-mode-actions
:type 'boolean) :type 'boolean)
(put 'verilog-auto-declare-nettype 'safe-local-variable `stringp) (put 'verilog-auto-declare-nettype 'safe-local-variable `stringp)
@ -696,6 +697,7 @@ mode is experimental."
(defcustom verilog-auto-wire-type nil (defcustom verilog-auto-wire-type nil
"*Non-nil specifies the data type to use with `verilog-auto-wire' etc. "*Non-nil specifies the data type to use with `verilog-auto-wire' etc.
Set this to \"logic\" for SystemVerilog code, or use `verilog-auto-logic'." Set this to \"logic\" for SystemVerilog code, or use `verilog-auto-logic'."
:version "24.1"
:group 'verilog-mode-actions :group 'verilog-mode-actions
:type 'boolean) :type 'boolean)
(put 'verilog-auto-wire-type 'safe-local-variable `stringp) (put 'verilog-auto-wire-type 'safe-local-variable `stringp)
@ -709,6 +711,7 @@ The name of the function or case will be set between the braces."
(defcustom verilog-auto-delete-trailing-whitespace nil (defcustom verilog-auto-delete-trailing-whitespace nil
"*True means to `delete-trailing-whitespace' in `verilog-auto'." "*True means to `delete-trailing-whitespace' in `verilog-auto'."
:version "24.1"
:group 'verilog-mode-actions :group 'verilog-mode-actions
:type 'boolean) :type 'boolean)
(put 'verilog-auto-delete-trailing-whitespace 'safe-local-variable 'verilog-booleanp) (put 'verilog-auto-delete-trailing-whitespace 'safe-local-variable 'verilog-booleanp)
@ -986,6 +989,7 @@ If nil, all blocking assigned signals are ignored when any
non-blocking assignment is in the AUTORESET block. This allows non-blocking assignment is in the AUTORESET block. This allows
blocking assignments to be used for temporary values and not have blocking assignments to be used for temporary values and not have
those temporaries reset. See example in `verilog-auto-reset'." those temporaries reset. See example in `verilog-auto-reset'."
:version "24.1"
:type 'boolean :type 'boolean
:group 'verilog-mode-auto) :group 'verilog-mode-auto)
(put 'verilog-auto-reset-blocking-in-non 'safe-local-variable 'verilog-booleanp) (put 'verilog-auto-reset-blocking-in-non 'safe-local-variable 'verilog-booleanp)
@ -1073,6 +1077,7 @@ declared together to remain together. Sorted order reduces
changes when declarations are moved around in a file. changes when declarations are moved around in a file.
See also `verilog-auto-arg-sort'." See also `verilog-auto-arg-sort'."
:version "24.1"
:group 'verilog-mode-auto :group 'verilog-mode-auto
:type 'boolean) :type 'boolean)
(put 'verilog-auto-inst-sort 'safe-local-variable 'verilog-booleanp) (put 'verilog-auto-inst-sort 'safe-local-variable 'verilog-booleanp)
@ -1135,6 +1140,7 @@ See the \\[verilog-faq] for examples on using this."
"*Data type used for the declaration for AUTOTIEOFF. If \"wire\" then "*Data type used for the declaration for AUTOTIEOFF. If \"wire\" then
create a wire, if \"assign\" create an assignment, else the data type for create a wire, if \"assign\" create an assignment, else the data type for
variable creation." variable creation."
:version "24.1"
:group 'verilog-mode-auto :group 'verilog-mode-auto
:type 'string) :type 'string)
(put 'verilog-auto-tieoff-declaration 'safe-local-variable 'stringp) (put 'verilog-auto-tieoff-declaration 'safe-local-variable 'stringp)

View file

@ -923,6 +923,7 @@ the old and FORCE is nil."
(defcustom ses-self-reference-early-detection nil (defcustom ses-self-reference-early-detection nil
"True if cycle detection is early for cells that refer to themselves." "True if cycle detection is early for cells that refer to themselves."
:version "24.1"
:type 'boolean :type 'boolean
:group 'ses) :group 'ses)

View file

@ -33,6 +33,7 @@
"Set to a list if the XTerm supports modifyOtherKeys or "Set to a list if the XTerm supports modifyOtherKeys or
reporting the background color. Set to 'check to check for those reporting the background color. Set to 'check to check for those
features. Set to nil to skip the checks." features. Set to nil to skip the checks."
:version "24.1"
:group 'xterm :group 'xterm
:type '(choice (const :tag "No" nil) :type '(choice (const :tag "No" nil)
(const :tag "Check" check) (const :tag "Check" check)

View file

@ -287,6 +287,7 @@ holds a keymap."
Possible values are `top' (tool bar on top), `bottom' (tool bar at bottom), Possible values are `top' (tool bar on top), `bottom' (tool bar at bottom),
`left' (tool bar on left) and `right' (tool bar on right). `left' (tool bar on left) and `right' (tool bar on right).
Customize `tool-bar-mode' if you want to show or hide the tool bar." Customize `tool-bar-mode' if you want to show or hide the tool bar."
:version "24.1"
:type '(choice (const top) :type '(choice (const top)
(const bottom) (const bottom)
(const left) (const left)

View file

@ -385,6 +385,7 @@ bottom side of each frame. If an element is a number, this means
to display at most that many side windows on the corresponding to display at most that many side windows on the corresponding
side. If an element is nil, this means there's no bound on the side. If an element is nil, this means there's no bound on the
number of slots on that side." number of slots on that side."
:version "24.1"
:risky t :risky t
:type :type
'(list '(list