574 |
;; but it *did* have an asterisk in the docstring! |
;; but it *did* have an asterisk in the docstring! |
575 |
(defcustom sh-builtins |
(defcustom sh-builtins |
576 |
'((bash sh-append posix |
'((bash sh-append posix |
577 |
"." "alias" "bg" "bind" "builtin" "compgen" "complete" |
"." "alias" "bg" "bind" "builtin" "caller" "compgen" "complete" |
578 |
"declare" "dirs" "disown" "enable" "fc" "fg" "help" "history" |
"declare" "dirs" "disown" "enable" "fc" "fg" "help" "history" |
579 |
"jobs" "kill" "let" "local" "popd" "printf" "pushd" "shopt" |
"jobs" "kill" "let" "local" "popd" "printf" "pushd" "shopt" |
580 |
"source" "suspend" "typeset" "unalias") |
"source" "suspend" "typeset" "unalias") |
791 |
:group 'sh-indentation) |
:group 'sh-indentation) |
792 |
(defvar sh-heredoc-face 'sh-heredoc-face) |
(defvar sh-heredoc-face 'sh-heredoc-face) |
793 |
|
|
794 |
|
(defface sh-escaped-newline '((t :inherit font-lock-string-face)) |
795 |
|
"Face used for (non-escaped) backslash at end of a line in Shell-script mode." |
796 |
|
:group 'sh-script |
797 |
|
:version "22.1") |
798 |
|
|
799 |
(defvar sh-font-lock-keywords |
(defvar sh-font-lock-keywords |
800 |
'((csh sh-append shell |
'((csh sh-append shell |
819 |
;; The next entry is only used for defining the others |
;; The next entry is only used for defining the others |
820 |
(shell sh-append executable-font-lock-keywords |
(shell sh-append executable-font-lock-keywords |
821 |
;; Using font-lock-string-face here confuses sh-get-indent-info. |
;; Using font-lock-string-face here confuses sh-get-indent-info. |
822 |
("\\\\$" 0 font-lock-warning-face) |
("\\(^\\|[^\\]\\)\\(\\\\\\\\\\)*\\(\\\\\\)$" 3 'sh-escaped-newline) |
823 |
("\\\\[^A-Za-z0-9]" 0 font-lock-string-face) |
("\\\\[^A-Za-z0-9]" 0 font-lock-string-face) |
824 |
("\\${?\\([A-Za-z_][A-Za-z0-9_]*\\|[0-9]+\\|[$*_]\\)" 1 |
("\\${?\\([A-Za-z_][A-Za-z0-9_]*\\|[0-9]+\\|[$*_]\\)" 1 |
825 |
font-lock-variable-name-face)) |
font-lock-variable-name-face)) |