Revert "Search for LaTeX setup case-insensitively"

This reverts commit 034dbac3eecdd67c83407f55cd920d3720400055.

lisp/org-beamer.el

@@ -438,10 +438,8 @@ The effect is that these values will be accessible during export."
 		(save-restriction
 		  (widen)
 		  (goto-char (point-min))
-		  (and (let ((case-fold-search t))
-			 (re-search-forward
-			  "^#\\+BEAMER_FRAME_LEVEL:[ \t]*\\(.*?\\)[ \t]*$"
-			  nil t))
+		  (and (re-search-forward
+			"^#\\+BEAMER_FRAME_LEVEL:[ \t]*\\(.*?\\)[ \t]*$" nil t)
 		       (match-string 1))))
 	      (plist-get org-export-latex-options-plist :beamer-frame-level)
 	      org-beamer-frame-level))
@@ -463,7 +461,7 @@ The effect is that these values will be accessible during export."
 	      (save-excursion
 		(save-restriction
 		  (widen)
-		  (let ((txt "") (case-fold-search t))
+		  (let ((txt ""))
 		    (goto-char (point-min))
 		    (while (re-search-forward
 			    "^#\\+BEAMER_HEADER_EXTRA:[ \t]*\\(.*?\\)[ \t]*$"

lisp/org-latex.el

@@ -1124,9 +1124,7 @@ LEVEL indicates the default depth for export."
 	      (save-restriction
 		(widen)
 		(goto-char (point-min))
-		(and (let ((case-fold-search t))
-		       (re-search-forward
-			"^#\\+LaTeX_CLASS:[ \t]*\\(-[a-zA-Z]+\\)" nil t))
+		(and (re-search-forward "^#\\+LaTeX_CLASS:[ \t]*\\(-[a-zA-Z]+\\)" nil t)
 		     (match-string 1))))
 	    (plist-get org-export-latex-options-plist :latex-class)
 	    org-export-latex-default-class)
@@ -1140,10 +1138,8 @@ LEVEL indicates the default depth for export."
 	      (save-restriction
 		(widen)
 		(goto-char (point-min))
-		(and (let ((case-fold-search t))
-		       (re-search-forward
-			"^#\\+LaTeX_CLASS_OPTIONS:[ \t]*\\(.*?\\)[ \t]*$" nil t)
-		       (match-string 1)))))
+		(and (re-search-forward "^#\\+LaTeX_CLASS_OPTIONS:[ \t]*\\(.*?\\)[ \t]*$" nil t)
+		     (match-string 1))))
 	    (plist-get org-export-latex-options-plist :latex-class-options))
 	org-export-latex-class
 	(or (car (assoc org-export-latex-class org-export-latex-classes))