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

make-local-hook.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 05d1cc98306502e640405e7f36765c9889c35473..a88de10da50ff393aadec91c13b55a399da4133d 100644 (file)
--- 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 0b8287503f860518516c94f42ebcf8698eb6156b..96c94591531f8c417e95eda4a6892580ebfb5282 100644 (file)
--- 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