[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/engrave-faces 6d2bcb72c0 2/2: No need to manually speci
From: |
ELPA Syncer |
Subject: |
[elpa] externals/engrave-faces 6d2bcb72c0 2/2: No need to manually specify defcustom :group |
Date: |
Mon, 22 Aug 2022 21:57:34 -0400 (EDT) |
branch: externals/engrave-faces
commit 6d2bcb72c013524f9150bddd841ff081f2b0b60b
Author: TEC <git@tecosaur.net>
Commit: TEC <git@tecosaur.net>
No need to manually specify defcustom :group
Raised by Stefan Monnier
---
engrave-faces.el | 12 ++++--------
1 file changed, 4 insertions(+), 8 deletions(-)
diff --git a/engrave-faces.el b/engrave-faces.el
index 6753ad6578..8d29a6b8a3 100644
--- a/engrave-faces.el
+++ b/engrave-faces.el
@@ -42,31 +42,28 @@
(defgroup engrave-faces nil
"Export buffers with font-lock information to other formats."
- :group 'hypermedia)
+ :group 'hypermedia
+ :prefix "engrave-faces-")
(defcustom engrave-faces-attributes-of-interest
'(:family :foreground :background :slant :weight :height :strike-through)
"Attributes which sould be paid attention to."
- :group 'engrave-faces
:type '(repeat symbol))
(defcustom engrave-faces-before-hook nil
"Hook run before engraving a buffer.
The hook functions are run in the source buffer (not the resulting buffer)."
- :group 'engrave-faces
:type 'hook)
(defcustom engrave-faces-after-hook nil
"Hook run after engraving a buffer.
Unlike `engrave-faces-before-hook', these functions are run in the generated
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)
+ :type 'boolean)
(define-obsolete-variable-alias 'engrave-faces-preset-styles
'engrave-faces-current-preset-style "0.3")
@@ -142,8 +139,7 @@ cdrs in the form of `engrave-faces-current-preset-style'."
(symbol :tag "Face attribute")
:tag "Property")
:value-type (choice :tag "Value" string symbol)
- :tag "Face specification"))))
- :group 'engrave-faces)
+ :tag "Face specification")))))
(defcustom engrave-faces-current-preset-style
(alist-get 'default engrave-faces-themes)