From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Thu, 27 Jan 2022 15:30:12 +0000 (+0100)
Subject: Tweak href/superscript fix in tex-mode
X-Git-Tag: emacs-29.0.90~2710
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b9239954b60c1c86e64ba1047eb8b48310ad4072;p=emacs.git

Tweak href/superscript fix in tex-mode

* lisp/textmodes/tex-mode.el (tex-font-lock-keywords-1): Fix
superscripts in href in a better way.
---

diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index f41cc2c15ed..ab94036d01d 100644
--- a/lisp/textmodes/tex-mode.el
+++ b/lisp/textmodes/tex-mode.el
@@ -505,7 +505,9 @@ An alternative value is \" . \", if you use a font with a narrow period."
 			"documentstyle" "documentclass" "verbatiminput"
 			"includegraphics" "includegraphics*")
 		      t))
-           (verbish (regexp-opt '("url" "nolinkurl" "path") t))
+           (verbish (regexp-opt '("url" "nolinkurl" "path"
+                                  "href" "ProvidesFile")
+                                t))
 	   ;; Miscellany.
 	   (slash "\\\\")
 	   (opt " *\\(\\[[^]]*\\] *\\)*")
@@ -578,9 +580,6 @@ An alternative value is \" . \", if you use a font with a narrow period."
 			  ;; "caption" "footnote" "footnotemark" "footnotetext"
 			  )
 			t))
-	    (file-like (regexp-opt
-			'("href" "ProvidesFile")
-			t))
 	    ;;
 	    ;; Names of commands that should be fontified.
 	    (specials-1 (regexp-opt '("\\" "\\*") t)) ;; "-"
@@ -601,8 +600,6 @@ An alternative value is \" . \", if you use a font with a narrow period."
 	;;
 	;; Citation args.
 	(list (concat slash citations opt arg) 3 'font-lock-constant-face)
-	;; File-like args.
-	(list (concat slash file-like opt arg) 3 'font-lock-constant-face)
 	;;
         ;; Text between `` quotes ''.
         (list (concat (regexp-opt '("``" "\"<" "\"`" "<<" "«") t)