From xemacs-m  Sun Apr 13 07:06:01 1997
Received: from jagor.srce.hr (hniksic@jagor.srce.hr [161.53.2.130])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id HAA01566
	for <xemacs-beta@xemacs.org>; Sun, 13 Apr 1997 07:06:00 -0500 (CDT)
Received: (from hniksic@localhost)
          by jagor.srce.hr (8.8.5/8.8.4)
	  id OAA11345; Sun, 13 Apr 1997 14:05:57 +0200 (MET DST)
Sender: hniksic@public.srce.hr
To: XEmacs Developers <xemacs-beta@xemacs.org>
Subject: Small custom fixes
X-URL: ftp://gnjilux.cc.fer.hr/pub/unix/util/wget/
X-Attribution: Hrv
X-Face: &}4JQk=L;e.~x+|eo]#DGk@x3~ed!.~lZ}YQcYb7f[WL9L'Z*+OyA\nA
        EL1M(".[qvI#a2E6WYI5>>e7'@_)3Ol9p|Nn2wNa/;~06jL*B%tTcn/X
        vhAu7qeES0\|MF%$;sI#yn1+y"
From: Hrvoje Niksic <hniksic@srce.hr>
Date: 13 Apr 1997 14:05:56 +0200
Message-ID: <kigragfxh3v.fsf@jagor.srce.hr>
Lines: 116
X-Mailer: Gnus v5.4.42/XEmacs 19.15

Small patch for b15 that fixes some shortsightings.

Off-that-topic, I'd like to raise a question if the packages that
install themselves when loaded are a good thing to gave?  For example,
when browsing through custom menus, packages are loaded without my
consent.  It can turn on id-select, or a load of other stuff I don't
want.


--- lisp/prim/simple.el.orig	Sun Apr 13 13:57:06 1997
+++ lisp/prim/simple.el	Sun Apr 13 13:57:18 1997
@@ -68,9 +68,15 @@
   :group 'editing)
 
 (defgroup paren-matching nil
-  "Matching and blinking of parens"
+  "Highlight (un)matching of parens and expressions."
+  :prefix "paren-"
   :group 'matching)
 
+(defgroup paren-blinking nil
+  "Blinking of matched parens."
+  :prefix "blink-"
+  :group 'paren-matching)
+
 
 (defun newline (&optional arg)
   "Insert a newline, and move to left margin of the new line if it's blank.
@@ -2691,29 +2697,29 @@
 (defcustom blink-matching-paren t
   "*Non-nil means show matching open-paren when close-paren is inserted."
   :type 'boolean
-  :group 'paren-matching)
+  :group 'paren-blinking)
 
 (defcustom blink-matching-paren-on-screen t
   "*Non-nil means show matching open-paren when it is on screen.
 nil means don't show it (but the open-paren can still be shown
 when it is off screen."
   :type 'boolean
-  :group 'paren-matching)
+  :group 'paren-blinking)
 
 (defcustom blink-matching-paren-distance 12000
   "*If non-nil, is maximum distance to search for matching open-paren."
   :type '(choice integer (const nil))
-  :group 'paren-matching)
+  :group 'paren-blinking)
 
 (defcustom blink-matching-delay 1
   "*The number of seconds that `blink-matching-open' will delay at a match."
   :type 'number
-  :group 'paren-matching)
+  :group 'paren-blinking)
 
 (defcustom blink-matching-paren-dont-ignore-comments nil
   "*Non-nil means `blink-matching-paren' should not ignore comments."
   :type 'boolean
-  :group 'paren-matching)
+  :group 'paren-blinking)
 
 (defun blink-matching-open ()
   "Move cursor momentarily to the beginning of the sexp before point."
--- lisp/packages/paren.el.orig	Sun Apr 13 13:56:00 1997
+++ lisp/packages/paren.el	Sun Apr 13 13:56:03 1997
@@ -54,15 +54,10 @@
 
 ;;; Code:
 
-(defgroup paren nil
-  "Highlight (un)matching parens and whole expressions"
-  :group 'matching)
-
-
 (defcustom paren-message-offscreen t
   "*Display message if matching open paren is offscreen."
   :type 'boolean
-  :group 'paren)
+  :group 'paren-matching)
 
 (defcustom paren-ding-unmatched nil
   "*Make noise if the cursor is at an unmatched paren.
@@ -74,7 +69,7 @@
   :type '(choice (const :tag "off" nil)
 		 (const :tag "on" t)
 		 (const :tag "other" other))
-  :group 'paren)
+  :group 'paren-matching)
 
 ;;;###autoload
 (defcustom paren-mode nil
@@ -92,7 +87,7 @@
 highlight parentheses differently in different major modes."
   :type '(radio (const nil) (const blink-paren) (const paren)
 		(const sexp) (const nested))
-  :group 'paren)
+  :group 'paren-matching)
 
 (make-face 'paren-match)
 (or (face-differs-from-default-p 'paren-match)
--- lisp/prim/isearch-mode.el.orig	Sun Apr 13 13:46:39 1997
+++ lisp/prim/isearch-mode.el	Sun Apr 13 13:46:52 1997
@@ -94,6 +94,7 @@
 
 (defgroup isearch nil
   "Incremental search"
+  :prefix "search-"
   :group 'matching)
 
 

-- 
Hrvoje Niksic <hniksic@srce.hr> | Student at FER Zagreb, Croatia
--------------------------------+--------------------------------
4.  Thou shalt not warlorde a sig if it bee the sig of Kibo, nor if
    it bee the sig of the Inner Circle.

