el/dot-emacs.el: More Perl keywords.

[profile] / el / dot-emacs.el

diff --git a/el/dot-emacs.el b/el/dot-emacs.el
index ea20e5ddc8505116e95d6a07070b3686d32debef..4712dc94d7d0aba0426b29ce4a7e55cf63a9f186 100644 (file)
--- a/el/dot-emacs.el
+++ b/el/dot-emacs.el
@@ -1531,11 +1531,11 @@ (defun mdw-fontify-perl ()
   ;; Now define fontification things.
   (make-local-variable 'font-lock-keywords)
   (let ((perl-keywords
   ;; Now define fontification things.
   (make-local-variable 'font-lock-keywords)
   (let ((perl-keywords

-        (mdw-regexps "and" "cmp" "continue" "do" "else" "elsif" "eq"
-                     "for" "foreach" "ge" "gt" "goto" "if"
+        (mdw-regexps "and" "break" "cmp" "continue" "do" "else" "elsif" "eq"
+                     "for" "foreach" "ge" "given" "gt" "goto" "if"

                      "last" "le" "lt" "local" "my" "ne" "next" "or"
                      "last" "le" "lt" "local" "my" "ne" "next" "or"

-                     "package" "redo" "require" "return" "sub"
-                     "undef" "unless" "until" "use" "while")))
+                     "our" "package" "redo" "require" "return" "sub"
+                     "undef" "unless" "until" "use" "when" "while")))

 
     (setq font-lock-keywords
          (list
 
     (setq font-lock-keywords
          (list