From e80cac1a5d42712e7f6d3af491e20c41b6e7033b Mon Sep 17 00:00:00 2001
From: "Basil L. Contovounesios" <basil@contovou.net>
Date: Mon, 4 Mar 2024 07:19:22 +0100
Subject: [PATCH] ; Fix last major-mode-remap-defaults change.

(cherry picked from commit 6dacb60bb135dbb002c2ce1c70f70430c5d1bbff)
---
 lisp/org/ox.el              | 2 +-
 lisp/progmodes/c-ts-mode.el | 6 +++---
 lisp/progmodes/cc-mode.el   | 4 ++--
 3 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/lisp/org/ox.el b/lisp/org/ox.el
index 8e2fdd22acd..bf2d9b569af 100644
--- a/lisp/org/ox.el
+++ b/lisp/org/ox.el
@@ -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.
diff --git a/lisp/progmodes/c-ts-mode.el b/lisp/progmodes/c-ts-mode.el
index 315bb68699e..38b72e59388 100644
--- a/lisp/progmodes/c-ts-mode.el
+++ b/lisp/progmodes/c-ts-mode.el
@@ -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
diff --git a/lisp/progmodes/cc-mode.el b/lisp/progmodes/cc-mode.el
index e46ac2e2178..1a9d0907bd0 100644
--- a/lisp/progmodes/cc-mode.el
+++ b/lisp/progmodes/cc-mode.el
@@ -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))))
-- 
2.39.5