Mercurial > hg > xemacs-beta

diff lisp/utils/id-select.el @ 126:1370575f1259 xemacs-20-1p1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag xemacs-20-1p1
author cvs
date Mon, 13 Aug 2007 09:27:39 +0200
parents 9b50b4588a93
children a2f645c6b9f8
line wrap: on
line diff
--- a/lisp/utils/id-select.el	Mon Aug 13 09:26:41 2007 +0200
+++ b/lisp/utils/id-select.el	Mon Aug 13 09:27:39 2007 +0200
@@ -164,9 +164,13 @@
 ;;; Public variables
 ;;; ************************************************************************
 
-(defgroup id-select nil
-  "Select larger and larger syntax-driven regions in a buffer"
-  :group 'mouse)
+;; We need the progn to kill off the defgroup-tracking mechanism.
+;; This package changes the state of XEmacs by loading it, which is
+;; why it's potentially dangerous.
+(progn
+  (defgroup id-select nil
+    "Select larger and larger syntax-driven regions in a buffer"
+    :group 'mouse))
 
 
 (defcustom id-select-brace-modes