# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1252861763 0
# Node ID 45d111e58a36a6dbe4e4e9d835edb2ecff6ed410
# Parent  48428e99bf83e2e5ad382d10e2b97f93ac515357
* progmodes/cperl-mode.el (cperl-init-faces): Revert last change.

diff -r 48428e99bf83 -r 45d111e58a36 lisp/ChangeLog
--- a/lisp/ChangeLog	Sun Sep 13 02:16:25 2009 +0000
+++ b/lisp/ChangeLog	Sun Sep 13 17:09:23 2009 +0000
@@ -1,5 +1,7 @@
 2009-09-13  Chong Yidong  <cyd@stupidchicken.com>
 
+	* progmodes/cperl-mode.el (cperl-init-faces): Revert last change.
+
 	* eshell/em-hist.el:
 	* eshell/em-dirs.el (eshell-complete-user-reference): Declare
 	pcomplete functions and variables to avoid compiler warnings.
diff -r 48428e99bf83 -r 45d111e58a36 lisp/progmodes/cperl-mode.el
--- a/lisp/progmodes/cperl-mode.el	Sun Sep 13 02:16:25 2009 +0000
+++ b/lisp/progmodes/cperl-mode.el	Sun Sep 13 17:09:23 2009 +0000
@@ -5693,7 +5693,7 @@
 	  (setq
 	   t-font-lock-keywords
 	   (list
-	    (list "[ \t]+$" 0 cperl-invalid-face t)
+	    `("[ \t]+$" 0 ',cperl-invalid-face t)
 	    (cons
 	     (concat
 	      "\\(^\\|[^$@%&\\]\\)\\<\\("