1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00

; Fix last major-mode-remap-defaults change.

This commit is contained in:
Basil L. Contovounesios 2024-03-04 07:19:22 +01:00
parent 2b5d43081a
commit 6dacb60bb1
3 changed files with 6 additions and 6 deletions

View file

@ -6608,7 +6608,7 @@ use it to set a major mode there, e.g.,
(interactive)
(org-export-to-buffer \\='latex \"*Org LATEX Export*\"
async subtreep visible-only body-only ext-plist
(major-mode-remap 'latex-mode)))
(major-mode-remap \\='latex-mode)))
When expressed as an anonymous function, using `lambda',
POST-PROCESS needs to be quoted.

View file

@ -1438,7 +1438,7 @@ should be used.
This function attempts to use file contents to determine whether
the code is C or C++ and based on that chooses whether to enable
`c-ts-mode' or `c++-ts-mode'."
(declare (obsolete c-or-c++-mode "30.1"))?
(declare (obsolete c-or-c++-mode "30.1"))
(interactive)
(let ((mode
(if (save-excursion
@ -1447,8 +1447,8 @@ the code is C or C++ and based on that chooses whether to enable
(widen)
(goto-char (point-min))
(re-search-forward c-ts-mode--c-or-c++-regexp nil t))))
'c++-ts-mode)
'c-ts-mode))
'c++-ts-mode
'c-ts-mode)))
(funcall (major-mode-remap mode))))
;; The entries for C++ must come first to prevent *.c files be taken

View file

@ -2910,8 +2910,8 @@ the code is C or C++ and based on that chooses whether to enable
(goto-char (point-min))
(re-search-forward c-or-c++-mode--regexp
(+ (point) c-guess-region-max) t))))
'c++-mode)
'c-mode))
'c++-mode
'c-mode)))
(funcall (if (fboundp 'major-mode-remap)
(major-mode-remap mode)
mode))))