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

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

[elpa] externals/engrave-faces 14eddbe 13/36: LaTeX: Don't set colour at


From: ELPA Syncer
Subject: [elpa] externals/engrave-faces 14eddbe 13/36: LaTeX: Don't set colour at the start of a block
Date: Tue, 31 Aug 2021 01:57:25 -0400 (EDT)

branch: externals/engrave-faces
commit 14eddbe96b12e30236d0086ce9743fec9aa8c03c
Author: TEC <tec@tecosaur.com>
Commit: TEC <tec@tecosaur.com>

    LaTeX: Don't set colour at the start of a block
    
    This is a poor approach as it doesn't persist over page breaks.
    It's better to set the foreground colour in the definition for a
    tcolorbox using the defined EFD (default foreground) colour.
---
 engrave-faces-latex.el | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

diff --git a/engrave-faces-latex.el b/engrave-faces-latex.el
index 76f8b16..38d02da 100644
--- a/engrave-faces-latex.el
+++ b/engrave-faces-latex.el
@@ -71,12 +71,11 @@
 
 (defun engrave-faces-latex-post-processing ()
   (goto-char (point-min))
-  (insert (if (eq engrave-faces-latex-output-style 'preset)
-              "\\color{EFD}"
-            (concat "\\color[HTML]{"
-                    (substring (plist-get (cdr (assoc 'default 
engrave-faces-preset-styles))
-                                          :foreground) 1)
-                    "}")))
+  (when (eq engrave-faces-latex-output-style 'preset)
+    (insert "\\color[HTML]{"
+            (substring (plist-get (cdr (assoc 'default 
engrave-faces-preset-styles))
+                                  :foreground) 1)
+            "}"))
   (dolist (find-sub engrave-faces-latex-char-replacements)
     (goto-char (point-min))
     (while (search-forward (car find-sub) nil t)



reply via email to

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