summaryrefslogtreecommitdiff
path: root/lisp/autoinsert.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2016-02-01 20:59:32 -0500
committerGlenn Morris <rgm@gnu.org>2016-02-01 20:59:32 -0500
commit93f21530ad0a17310f97f1a25dfbc67b249bf2e7 (patch)
treefd53bd8927276313438bf6f967241e7a7ba0e8bf /lisp/autoinsert.el
parent9f60d7e9a27b107d5bd35bf9d7621a300e17dbfb (diff)
downloademacs-93f21530ad0a17310f97f1a25dfbc67b249bf2e7.tar.gz
Improve the custom type of some user options.
* lisp/autoinsert.el (auto-insert-alist): * lisp/replace.el (query-replace-from-to-separator): * lisp/gnus/gnus-art.el (gnus-hidden-properties): * lisp/gnus/gnus-gravatar.el (gnus-gravatar-properties): * lisp/gnus/gnus-picon.el (gnus-picon-properties): * lisp/progmodes/prolog.el (prolog-keywords, prolog-types) (prolog-mode-specificators, prolog-determinism-specificators) (prolog-directives, prolog-program-name, prolog-program-switches) (prolog-consult-string, prolog-compile-string, prolog-eof-string) (prolog-prompt-regexp): Improve custom type.
Diffstat (limited to 'lisp/autoinsert.el')
-rw-r--r--lisp/autoinsert.el12
1 files changed, 11 insertions, 1 deletions
diff --git a/lisp/autoinsert.el b/lisp/autoinsert.el
index e5dd62ff4d8..43fa31288e6 100644
--- a/lisp/autoinsert.el
+++ b/lisp/autoinsert.el
@@ -305,7 +305,17 @@ ACTION may be a skeleton to insert (see `skeleton-insert'), an absolute
file-name or one relative to `auto-insert-directory' or a function to call.
ACTION may also be a vector containing several successive single actions as
described above, e.g. [\"header.insert\" date-and-author-update]."
- :type 'sexp
+ :type '(alist :key-type
+ (choice (regexp :tag "Regexp matching file name")
+ (symbol :tag "Major mode")
+ (cons :tag "Condition and description"
+ (choice :tag "Condition"
+ (regexp :tag "Regexp matching file name")
+ (symbol :tag "Major mode"))
+ (string :tag "Description")))
+ ;; There's no custom equivalent of "repeat" for vectors.
+ :value-type (choice file function
+ (sexp :tag "Skeleton or vector")))
:version "25.1"
:group 'auto-insert)