From: Mark Wooding <mdw@distorted.org.uk>
Date: Sun, 20 Nov 2011 22:41:04 +0000 (+0000)
Subject: el/dot-emacs.el: More Perl keywords.
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/profile/commitdiff_plain/b585e4eae85ee8f30d6bd8c95744fecbeefe66d7?ds=inline

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

diff --git a/el/dot-emacs.el b/el/dot-emacs.el
index ea20e5d..4712dc9 100644
--- 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
-	 (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"
-		      "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