exot/.emacs.d
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

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

Browse Source 
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
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
init.el
View File

@ -2803,7 +2803,13 @@ eventuelly be set to nil, however)."
:commands (cperl-mode) :commands (cperl-mode)
:mode ("\\.plx\\'" . cperl-mode) :mode ("\\.plx\\'" . cperl-mode)
:init (progn :init (progn
(add-to-list 'major-mode-remap-alist '(perl-mode . cperl-mode)) (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 (setq cperl-hairy nil
cperl-invalid-face 'default cperl-invalid-face 'default
@ -2829,7 +2835,8 @@ eventuelly be set to nil, however)."
:config (require 'gnutls)) :config (require 'gnutls))
(when (package-installed-p "auctex") (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)) (require 'db-latex))
(use-package edit-indirect ; to allow code editing in markdown-mode (use-package edit-indirect ; to allow code editing in markdown-mode