From 3e030f81649df3476b251cd50c5e3e78abf7bc79 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Harald=20J=C3=B6rg?= Date: Thu, 16 May 2024 21:55:07 +0200 Subject: [PATCH] ;cperl-mode.el: Allow running under Emacs >=27 I would like to advertise cperl-mode.el from the repository as a workaround for bug#70948. This can be achieved by safeguarding the call to derived-mode-add-parents with a version check. * lisp/progmodes/cperl-mode.el: Call derived-mode-add-parents only if it is available. (cherry picked from commit 96269209a3e22707635239d057be4feac217b4bc) --- lisp/progmodes/cperl-mode.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el index 11709bfe00b..81ecb535b82 100644 --- a/lisp/progmodes/cperl-mode.el +++ b/lisp/progmodes/cperl-mode.el @@ -1934,7 +1934,8 @@ or as help on variables `cperl-tips', `cperl-problems', ;; Setup Flymake (add-hook 'flymake-diagnostic-functions #'perl-flymake nil t)) -(derived-mode-add-parents 'cperl-mode '(perl-mode)) +(when (fboundp 'derived-mode-add-parents) ; to run under Emacs <30 + (derived-mode-add-parents 'cperl-mode '(perl-mode))) (defun cperl--set-file-style () (when cperl-file-style -- 2.39.5