Fix previous cperl-file-style change

* lisp/progmodes/cperl-mode.el (cperl--set-file-style): New function.
(cperl-mode): Add it to hack-local-variables-hook to really set
the cperl style.
This commit is contained in:
Lars Ingebrigtsen 2022-05-11 16:47:53 +02:00
parent ca52b12780
commit 9e131744fb

View file

@ -1812,8 +1812,13 @@ or as help on variables `cperl-tips', `cperl-problems',
(cperl-find-pods-heres))
(when cperl-file-style
(cperl-set-style cperl-file-style))
(add-hook 'hack-local-variables-hook #'cperl--set-file-style nil t)
;; Setup Flymake
(add-hook 'flymake-diagnostic-functions #'perl-flymake nil t))
(defun cperl--set-file-style ()
(when cperl-file-style
(cperl-set-style cperl-file-style)))
;; Fix for perldb - make default reasonable
(defun cperl-db ()