auctex-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Tracking ifluatex.sty in AUCTeX


From: Arash Esbati
Subject: Tracking ifluatex.sty in AUCTeX
Date: Fri, 22 Apr 2022 21:50:32 +0200
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/29.0.50

Hi Davide,

you might know that ifluatex.sty is now part of iftex bundle and looks
like this:

--8<---------------cut here---------------start------------->8---
\ifx\RequirePackage\undefined
  \input iftex.sty
\else
  \ProvidesPackage{ifluatex}[2019/10/25 v1.5 ifluatex legacy package. Use iftex 
instead.]
  \RequirePackage{iftex}
\fi
--8<---------------cut here---------------end--------------->8---

Do you mind if I apply this patch to ifluatex.el:

--8<---------------cut here---------------start------------->8---
diff --git a/style/ifluatex.el b/style/ifluatex.el
index 86a7638a..990222a3 100644
--- a/style/ifluatex.el
+++ b/style/ifluatex.el
@@ -1,6 +1,6 @@
-;;; ifluatex.el --- AUCTeX style for `ifluatex.sty' version 1.3.  -*- 
lexical-binding: t; -*-
+;;; ifluatex.el --- AUCTeX style for `ifluatex.sty' version 1.5.  -*- 
lexical-binding: t; -*-

-;; Copyright (C) 2014, 2016, 2018, 2020 Free Software Foundation, Inc.
+;; Copyright (C) 2014--2022 Free Software Foundation, Inc.

 ;; Author: Davide G. M. Salvetti <salve@debian.org>
 ;; Maintainer: auctex-devel@gnu.org
@@ -25,7 +25,9 @@

 ;;; Commentary:

-;; This file adds support for `ifluatex.sty' 1.3.
+;; This file adds support for `ifluatex.sty' 1.5.  The package is now
+;; part of 'iftex' bundle and therefore, the code is now in
+;; 'iftex.el'.

 ;;; Code:

@@ -36,28 +38,20 @@
                   "font-latex"
                   (keywords class))

-(defun LaTeX-ifluatex-set-TeX-exit-mark (_optional)
-  "Discard OPTIONAL and set `TeX-exit-mark' to current point."
-  (set-marker TeX-exit-mark (point)))
-
 (TeX-add-style-hook
  "ifluatex"
  (lambda ()
+
+   ;; Run the style hook for 'iftex' which does the work:
+   (TeX-run-style-hooks "iftex")
+
    (TeX-add-symbols
-    '("ifluatex"
-      (TeX-arg-literal "%\n")
-      LaTeX-ifluatex-set-TeX-exit-mark
-      (TeX-arg-literal "\n\\else%\n\\fi%"))
     '("luatexversion" 0)
     '("luatexrevision" 0))
+
    (TeX-declare-expert-macros
     "ifluatex"
-    "ifluatex" "luatexversion" "luatexrevision")
-
-   ;; This package is used to make it possible to compile a document with both
-   ;; LuaTeX and base TeX engines.  By setting `TeX-check-engine-list' to nil
-   ;; we ignore engine restrictions posed by other packages.
-   (setq TeX-check-engine-list nil)
+    "luatexversion" "luatexrevision")

    (when (and (featurep 'font-latex)
               (eq TeX-install-font-lock 'font-latex-setup))
--8<---------------cut here---------------end--------------->8---

with to corresponding iftex.el which is attached?

Attachment: iftex.el
Description: application/emacs-lisp

Best, Arash

reply via email to

[Prev in Thread] Current Thread [Next in Thread]