# HG changeset patch # User Juri Linkov # Date 1132212114 0 # Node ID 29560f2ff8edf8669d35bb5958c031d8829bff14 # Parent 35ab5e34fdf537918db12bb01734b7d71f67124c (hi-lock): Rename this defgroup from `hi-lock-interactive-text-highlighting'. Change parent group from `faces' to `font-lock'. Add link to the manual. (hi-lock-mode, hi-lock-file-patterns-range) (hi-lock-exclude-modes, hi-lock-faces): Rename :group from `hi-lock-interactive-text-highlighting' to `hi-lock'. (hi-lock-faces): Add :group `faces'. diff -r 35ab5e34fdf5 -r 29560f2ff8ed lisp/hi-lock.el --- a/lisp/hi-lock.el Thu Nov 17 07:20:51 2005 +0000 +++ b/lisp/hi-lock.el Thu Nov 17 07:21:54 2005 +0000 @@ -84,9 +84,10 @@ (eval-and-compile (require 'font-lock)) -(defgroup hi-lock-interactive-text-highlighting nil +(defgroup hi-lock nil "Interactively add and remove font-lock patterns for highlighting text." - :group 'faces) + :link '(custom-manual "(emacs)Highlight Interactively") + :group 'font-lock) ;;;###autoload (defcustom hi-lock-mode nil @@ -95,7 +96,7 @@ (hi-lock-mode (or value 0))) :initialize 'custom-initialize-default :type 'boolean - :group 'hi-lock-interactive-text-highlighting + :group 'hi-lock :require 'hi-lock) (defcustom hi-lock-file-patterns-range 10000 @@ -104,7 +105,7 @@ up to this limit are added to font-lock's patterns. See documentation of functions `hi-lock-mode' and `hi-lock-find-patterns'." :type 'integer - :group 'hi-lock-interactive-text-highlighting) + :group 'hi-lock) (defcustom hi-lock-exclude-modes '(rmail-mode mime/viewer-mode gnus-article-mode) @@ -112,12 +113,13 @@ For security reasons since font lock patterns can specify function calls." :type '(repeat symbol) - :group 'hi-lock-interactive-text-highlighting) + :group 'hi-lock) (defgroup hi-lock-faces nil "Faces for hi-lock." - :group 'hi-lock-interactive-text-highlighting) + :group 'hi-lock + :group 'faces) (defface hi-yellow '((((min-colors 88) (background dark))