Check availability of major-mode-remap-alist before setting it

This is to restore some Emacs 28 backwards compatibility.
This commit is contained in:
Daniel Borchmann 2024-11-13 17:04:52 +01:00
parent 05bb198e08
commit 43fa4097df
No known key found for this signature in database
GPG Key ID: 784AA8DF0CCDF625

View File

@ -2803,7 +2803,13 @@ eventuelly be set to nil, however)."
:commands (cperl-mode)
:mode ("\\.plx\\'" . cperl-mode)
:init (progn
(if (boundp 'major-mode-remap-alist)
(add-to-list 'major-mode-remap-alist '(perl-mode . cperl-mode))
(mapc
#'(lambda (pair)
(if (eq (cdr pair) 'perl-mode)
(setcdr pair 'cperl-mode)))
(append auto-mode-alist interpreter-mode-alist)))
(setq cperl-hairy nil
cperl-invalid-face 'default
@ -2829,7 +2835,8 @@ eventuelly be set to nil, however)."
:config (require 'gnutls))
(when (package-installed-p "auctex")
(add-to-list 'major-mode-remap-alist '(latex-mode . LaTeX-mode))
(when (boundp 'major-mode-remap-alist)
(add-to-list 'major-mode-remap-alist '(latex-mode . LaTeX-mode)))
(require 'db-latex))
(use-package edit-indirect ; to allow code editing in markdown-mode