(cperl-mode): Remove unnecessary call to obsolete function

make-local-hook.

2 files changed, 4 insertions, 3 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 05d1cc98306..a88de10da50 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -3,6 +3,9 @@
         * dframe.el (dframe-frame-mode): Do not set auto-show-mode, since
         it is obsolete and has no effect.
 
+        * dos-w32.el (default-buffer-file-type): Add defvar to quieten
+        byte-compiler.
+
         * progmodes/cperl-mode.el (cperl-mode): Remove unnecessary call to
         obsolete function make-local-hook.
 
diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el
index 0b8287503f8..96c94591531 100644
--- a/lisp/progmodes/cperl-mode.el
+++ b/lisp/progmodes/cperl-mode.el
@@ -1871,9 +1871,7 @@ or as help on variables `cperl-tips', `cperl-problems',
       (easy-menu-add cperl-menu))       ; A NOP in Emacs.
   (run-mode-hooks 'cperl-mode-hook)
   (if cperl-hook-after-change
-      (progn
-        (make-local-hook 'after-change-functions)
-        (add-hook 'after-change-functions 'cperl-after-change-function nil t)))
+      (add-hook 'after-change-functions 'cperl-after-change-function nil t))
   ;; After hooks since fontification will break this
   (if cperl-pod-here-scan
       (or cperl-syntaxify-by-font-lock