Apparently the delimiters of the sixth group are missing.  Unless this
has been fixed already you could try:

(defun sh-font-lock-keywords-1 (&optional builtins)
  "Function to get better fontification including keywords."
  (let ((keywords (concat "\\([;(){}`|&]\\|^\\)[ \t]*\\(\\("
                          (regexp-opt (sh-feature sh-leading-keywords) t)
                          "[ \t]+\\)?"
                          (regexp-opt (append (sh-feature sh-leading-keywords)
                                              (sh-feature sh-other-keywords))
                                      t))))
    (sh-font-lock-keywords
     `(,@(if builtins
             `((,(concat keywords "[ \t]+\\)?\\("
                         (regexp-opt (sh-feature sh-builtins) t)
                         "\\)\\>")
                (2 font-lock-keyword-face nil t)
                (6 font-lock-builtin-face))
               ,@(sh-feature sh-font-lock-keywords-var-2)))
         (,(concat keywords "\\)\\>")
          2 font-lock-keyword-face)
         ,@(sh-feature sh-font-lock-keywords-var-1)))))




_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-devel

Reply via email to