From 39234e397320cdf8452da92bd73b444ca7cabeff Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Tue, 10 Apr 2007 04:05:00 +0000 Subject: [PATCH] (cperl-mode): Remove unnecessary call to obsolete function make-local-hook. --- lisp/ChangeLog | 3 +++ lisp/progmodes/cperl-mode.el | 4 +--- 2 files changed, 4 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 05d1cc9830..a88de10da5 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 0b8287503f..96c9459153 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 -- 2.39.2