4752 |
3 font-lock-variable-name-face))) |
3 font-lock-variable-name-face))) |
4753 |
'("\\<for\\(each\\)?\\([ \t]+\\(my\\|local\\|our\\)\\)?[ \t]*\\(\\$[a-zA-Z_][a-zA-Z_0-9]*\\)[ \t]*(" |
'("\\<for\\(each\\)?\\([ \t]+\\(my\\|local\\|our\\)\\)?[ \t]*\\(\\$[a-zA-Z_][a-zA-Z_0-9]*\\)[ \t]*(" |
4754 |
4 font-lock-variable-name-face) |
4 font-lock-variable-name-face) |
4755 |
;; Avoid s!!, qq!! etc. when not fontifying syntaxically |
;; Avoid $!, and s!!, qq!! etc. when not fontifying syntaxically |
4756 |
'("\\(?:^\\|[^smywqrx]\\)\\(!\\)" 1 font-lock-negation-char-face) |
'("\\(?:^\\|[^smywqrx$]\\)\\(!\\)" 1 font-lock-negation-char-face) |
4757 |
'("\\[\\(\\^\\)" 1 font-lock-negation-char-face prepend))) |
'("\\[\\(\\^\\)" 1 font-lock-negation-char-face prepend))) |
4758 |
(setq |
(setq |
4759 |
t-font-lock-keywords-1 |
t-font-lock-keywords-1 |