Fix byte-compile warnings about defgroup

- Specify parent group
- Use default group instead of explict specifying
This commit is contained in:
Syohei YOSHIDA 2016-07-11 07:50:47 +09:00
parent b571187d68
commit e17fa7c25a

View File

@ -39,16 +39,18 @@
;;; fold display mode and faces
(defgroup origami nil
"Origami: A text folding minor mode for Emacs."
:group 'editing)
(defcustom origami-fold-replacement "..."
;; TODO: this should also be specifiable as a function: folded text -> string
"Show this string instead of the folded text."
:type 'string
:group 'origami)
:type 'string)
(defcustom origami-show-fold-header nil
"Highlight the line the fold start on."
:type 'boolean
:group 'origami)
:type 'boolean)
(defface origami-fold-header-face
`((t (:box (:line-width 1 :color ,(face-attribute 'highlight :background))
@ -63,11 +65,6 @@
'((t :inherit 'font-lock-comment-face))
"Face used to display the fold replacement text.")
(defgroup origami '((origami-fold-header-face custom-face)
(origami-fold-fringe-face custom-face)
(origami-fold-replacement-face custom-face))
"Origami: A text folding minor mode for Emacs.")
;;; overlay manipulation
(defun origami-header-overlay-range (fold-overlay)