# HG changeset patch
# User Romain Francoise <romain@orebokech.com>
# Date 1163260192 0
# Node ID 9bcc33b6d297355579af2069de06a95934565dbd
# Parent  21fce1cf56eea430755b2498d7969fc0929c54d9
(cperl-mode): Before adding to it, make `compilation-error-regexp-alist'
buffer-local, since we changed `compilation-error-regexp-alist-alist'
locally.

diff -r 21fce1cf56ee -r 9bcc33b6d297 lisp/ChangeLog
--- a/lisp/ChangeLog	Sat Nov 11 14:24:28 2006 +0000
+++ b/lisp/ChangeLog	Sat Nov 11 15:49:52 2006 +0000
@@ -1,3 +1,9 @@
+2006-11-11  Romain Francoise  <romain@orebokech.com>
+
+	* progmodes/cperl-mode.el (cperl-mode): Before adding to it, make
+	`compilation-error-regexp-alist' buffer-local, since we changed
+	`compilation-error-regexp-alist-alist' locally.
+
 2006-11-11  Juanma Barranquero  <lekktu@gmail.com>
 
 	* server.el (server-visit-files): Bind `minibuffer-auto-raise'
diff -r 21fce1cf56ee -r 9bcc33b6d297 lisp/progmodes/cperl-mode.el
--- a/lisp/progmodes/cperl-mode.el	Sat Nov 11 14:24:28 2006 +0000
+++ b/lisp/progmodes/cperl-mode.el	Sat Nov 11 15:49:52 2006 +0000
@@ -1783,6 +1783,7 @@
          (if (fboundp 'compilation-build-compilation-error-regexp-alist)
              (let ((f 'compilation-build-compilation-error-regexp-alist))
                (funcall f))
+           (make-local-variable 'compilation-error-regexp-alist)
            (push 'cperl compilation-error-regexp-alist)))
 	((boundp 'compilation-error-regexp-alist);; xmeacs 19.x
 	 (make-local-variable 'compilation-error-regexp-alist)