diff options
| author | Harald Jörg <haj@posteo.de> | 2024-05-16 21:55:07 +0200 |
|---|---|---|
| committer | Harald Jörg <haj@posteo.de> | 2024-05-16 21:58:34 +0200 |
| commit | 96269209a3e22707635239d057be4feac217b4bc (patch) | |
| tree | f907bff895e0125fd48143d8defee5cf7288bee0 | |
| parent | 650ee9e071eea2ff8504e056131efa9f6ac894e9 (diff) | |
;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.
| -rw-r--r-- | lisp/progmodes/cperl-mode.el | 3 |
1 files changed, 2 insertions, 1 deletions
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 |