Mercurial > emacs
diff lisp/progmodes/sh-script.el @ 54158:43e09e943479
(sh-shell-arg, sh-require-final-newline, sh-assignment-regexp, sh-builtins)
(sh-leading-keywords, sh-other-keywords): Fix custom type.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Fri, 27 Feb 2004 17:20:57 +0000 |
| parents | 7864e9172d4e |
| children | d11df80991d8 |
line wrap: on
line diff
--- a/lisp/progmodes/sh-script.el Fri Feb 27 17:14:05 2004 +0000 +++ b/lisp/progmodes/sh-script.el Fri Feb 27 17:20:57 2004 +0000 @@ -315,9 +315,7 @@ :type '(repeat (cons (symbol :tag "Shell") (choice (const :tag "No Arguments" nil) (string :tag "Arguments") - (cons :format "Evaluate: %v" - (const :format "" eval) - sexp)))) + (sexp :format "Evaluate: %v")))) :group 'sh-script) (defcustom sh-imenu-generic-expression @@ -498,9 +496,7 @@ See `sh-feature'." :type '(repeat (cons (symbol :tag "Shell") (choice (const :tag "require" t) - (cons :format "Evaluate: %v" - (const :format "" eval) - sexp)))) + (sexp :format "Evaluate: %v")))) :group 'sh-script) @@ -515,9 +511,7 @@ sign. See `sh-feature'." :type '(repeat (cons (symbol :tag "Shell") (choice regexp - (cons :format "Evaluate: %v" - (const :format "" eval) - sexp)))) + (sexp :format "Evaluate: %v")))) :group 'sh-script) @@ -639,9 +633,7 @@ implemented as aliases. See `sh-feature'." :type '(repeat (cons (symbol :tag "Shell") (choice (repeat string) - (cons :format "Evaluate: %v" - (const :format "" eval) - sexp)))) + (sexp :format "Evaluate: %v")))) :group 'sh-script) @@ -663,9 +655,7 @@ flow of control or syntax. See `sh-feature'." :type '(repeat (cons (symbol :tag "Shell") (choice (repeat string) - (cons :format "Evaluate: %v" - (const :format "" eval) - sexp)))) + (sexp :format "Evaluate: %v")))) :group 'sh-script) @@ -702,9 +692,7 @@ See `sh-feature'." :type '(repeat (cons (symbol :tag "Shell") (choice (repeat string) - (cons :format "Evaluate: %v" - (const :format "" eval) - sexp)))) + (sexp :format "Evaluate: %v")))) :group 'sh-script)