branch: externals/engrave-faces
commit 9ef6c83553cf5f238520a39a3a0b590949704529
Author: TEC <t...@tecosaur.com>
Commit: TEC <t...@tecosaur.com>
Variable declaration rearrangement
---
engrave-faces.el | 20 ++++++++++----------
1 file changed, 10 insertions(+), 10 deletions(-)
diff --git a/engrave-faces.el b/engrave-faces.el
index a6d3940b89..761f31a1a5 100644
--- a/engrave-faces.el
+++ b/engrave-faces.el
@@ -63,8 +63,18 @@ buffer. You may use them to modify the outlook of the final
output."
:group 'engrave-faces
:type 'hook)
+(defcustom engrave-faces-log-preset-missed-faces nil
+ "Whether to log faces not found in `engrave-faces-current-preset-style'."
+ :type 'boolean
+ :group 'engrave-faces)
+
+(defvar engrave-faces-preset-missed-faces nil
+ "Faces not found in `engrave-faces-current-preset-style'.")
+
(defvar engrave-faces--backends nil)
+(define-obsolete-variable-alias 'engrave-faces-preset-styles
'engrave-faces-current-preset-style "0.3")
+
;;;###autoload
(defmacro engrave-faces-define-backend (backend extension face-transformer
&optional standalone-transformer view-setup)
"Create a new engraving backend BACKEND.
@@ -206,14 +216,6 @@ I.e. ([facea :inherit faceb] facec) results in (facea
faceb facec)"
(engrave-faces-explicit-inheritance inherit))))))
(if (listp faces) faces (list faces)))))
-(defvar engrave-faces-preset-missed-faces nil
- "Faces not found in `engrave-faces-current-preset-style'.")
-
-(defcustom engrave-faces-log-preset-missed-faces nil
- "Whether to log faces not found in `engrave-faces-current-preset-style'."
- :type 'boolean
- :group 'engrave-faces)
-
(defun engrave-faces-attribute-values (faces attribute)
"Fetch all specified instances of ATTRIBUTE for FACES, ignoring inheritence.
To consider inheritence, use `engrave-faces-explicit-inheritance' first."
@@ -318,8 +320,6 @@ cdrs in the form of `engrave-faces-current-preset-style'."
:tag "Face specification"))))
:group 'engrave-faces)
-(define-obsolete-variable-alias 'engrave-faces-preset-styles
'engrave-faces-current-preset-style "0.3")
-
(defcustom engrave-faces-current-preset-style
(alist-get 'default engrave-faces-themes)
"Overriding face values.
