emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[elpa] externals/org 9eec4af620 5/7: lisp/ox-latex.el: Add missing chara


From: ELPA Syncer
Subject: [elpa] externals/org 9eec4af620 5/7: lisp/ox-latex.el: Add missing character warnings
Date: Wed, 14 Feb 2024 09:58:44 -0500 (EST)

branch: externals/org
commit 9eec4af620448a03d920d07d52454cb29f3e8209
Author: Juan Manuel Macias <maciaschain@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    lisp/ox-latex.el: Add missing character warnings
    
    * (org-latex-known-warnings): Two missing character warnings are
    added: one for LuaLaTeX/XelaTeX and another for pdfLaTeX.
---
 lisp/ox-latex.el | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el
index cfa2b81787..2fdc2afe8c 100644
--- a/lisp/ox-latex.el
+++ b/lisp/ox-latex.el
@@ -1511,6 +1511,8 @@ logfiles to remove, set `org-latex-logfiles-extensions'."
     ("Underfull \\hbox" . "[underfull hbox]")
     ("Overfull \\hbox" . "[overfull hbox]")
     ("Citation.*?undefined" . "[undefined citation]")
+    ("^!.+Unicode character" . "[unicode character(s) not set up for use with 
pdflatex. You can run lualatex or xelatex instead]")
+    ("Missing character: There is no" . "[Missing character(s): please load an 
appropriate font with the fontspec package]")
     ("Undefined control sequence" . "[undefined control sequence]"))
   "Alist of regular expressions and associated messages for the user.
 The regular expressions are used to find possible warnings in the
@@ -4435,7 +4437,11 @@ encountered or nil if there was none."
     (save-excursion
       (goto-char (point-max))
       (when (re-search-backward "^[ \t]*This is .*?TeX.*?Version" nil t)
-       (if (re-search-forward "^!" nil t) 'error
+       (if (and
+            (re-search-forward "^!\\(.+\\)" nil t)
+             ;; This error is passed as missing character warning
+             (not (string-match-p "Unicode character" (match-string 1))))
+            'error
          (let ((case-fold-search t)
                (warnings ""))
            (dolist (warning org-latex-known-warnings)



reply via email to

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