From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Sun, 3 Feb 2013 15:47:12 +0000 (-0500)
Subject: * lisp/progmodes/cperl-mode.el (cperl-mode): Avoid byte-compile warning.
X-Git-Tag: emacs-24.3.90~173^2~7^2~156
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4813c453b22ff7b965e31a30d35b70f73d6bcbc7;p=emacs.git

* lisp/progmodes/cperl-mode.el (cperl-mode): Avoid byte-compile warning.

Fixes: debbugs:13614
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 693d2d769ce..d0c1ae7c5e7 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2013-02-03  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+	* progmodes/cperl-mode.el (cperl-mode): Avoid byte-compile warning
+	(bug#13614).
+
 	* subr.el (internal--called-interactively-p--get-frame): Avoid filling
 	current-load-list (bug#13366).
 
diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el
index c302bb484af..7d34269b6b5 100644
--- a/lisp/progmodes/cperl-mode.el
+++ b/lisp/progmodes/cperl-mode.el
@@ -1839,7 +1839,7 @@ or as help on variables `cperl-tips', `cperl-problems',
   (make-local-variable 'cperl-syntax-state)
   (setq cperl-syntax-state nil)		; reset syntaxification cache
   (if cperl-use-syntax-table-text-property
-      (if (boundp 'syntax-propertize-function)
+      (if (eval-when-compile (fboundp 'syntax-propertize-rules))
           (progn
             ;; Reset syntaxification cache.
             (set (make-local-variable 'cperl-syntax-done-to) nil)