From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/30557 Path: main.gmane.org!not-for-mail From: Per Abrahamsen Newsgroups: gmane.emacs.gnus.general Subject: Re: Customize group parameters problems Date: 01 May 2000 15:26:28 +0200 Organization: The Church of Emacs Sender: owner-ding@hpc.uh.edu Message-ID: References: <2nk8hing40.fsf@tiger.jia.vnet> <14601.62028.667517.509066@baynetworks.com> <2ng0s6newc.fsf@tiger.jia.vnet> NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: main.gmane.org 1035167077 9129 80.91.224.250 (21 Oct 2002 02:24:37 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Mon, 21 Oct 2002 02:24:37 +0000 (UTC) Return-Path: Original-Received: from lisa.math.uh.edu (lisa.math.uh.edu [129.7.128.49]) by mailhost.sclp.com (Postfix) with ESMTP id 14A03D051E for ; Mon, 1 May 2000 09:28:27 -0400 (EDT) Original-Received: from sina.hpc.uh.edu (lists@Sina.HPC.UH.EDU [129.7.3.5]) by lisa.math.uh.edu (8.9.1/8.9.1) with ESMTP id IAB27342; Mon, 1 May 2000 08:28:24 -0500 (CDT) Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Mon, 01 May 2000 08:27:52 -0500 (CDT) Original-Received: from mailhost.sclp.com (postfix@sclp3.sclp.com [204.252.123.139]) by sina.hpc.uh.edu (8.9.3/8.9.3) with ESMTP id IAA04333 for ; Mon, 1 May 2000 08:27:40 -0500 (CDT) Original-Received: from sheridan.dina.kvl.dk (sheridan.dina.kvl.dk [130.225.40.227]) by mailhost.sclp.com (Postfix) with ESMTP id 323FBD051E for ; Mon, 1 May 2000 09:26:37 -0400 (EDT) Original-Received: from zuse.dina.kvl.dk (zuse.dina.kvl.dk [130.225.40.245]) by sheridan.dina.kvl.dk (8.9.3/8.9.3/Debian/GNU) with ESMTP id PAA12857 for ; Mon, 1 May 2000 15:23:45 +0200 Original-Received: (from abraham@localhost) by zuse.dina.kvl.dk (8.9.3+Sun/8.9.1) id PAA23912; Mon, 1 May 2000 15:26:28 +0200 (MET DST) X-Authentication-Warning: zuse.dina.kvl.dk: abraham set sender to abraham@dina.kvl.dk using -f Original-To: ding@gnus.org X-Face: +kRV2]2q}lixHkE{U)mY#+6]{AH=yN~S9@IFiOa@X6?GM|8MBp/ In-Reply-To: Shenghuo ZHU's message of "28 Apr 2000 16:34:27 -0400" Original-Lines: 55 User-Agent: Gnus/5.0804 (Gnus v5.8.4) Emacs/20.4 Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:30557 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:30557 Shenghuo ZHU writes: > I agree. But I am not familiar with those widgets. Does anyone know > how to fix it? It is a `wid-edit.el' bug/limitation. Here is a fix. I have send it to the Emacs maintainers, I believe Hjrove has already fixed it for XEmacs. 2000-05-01 Per Abrahamsen * wid-edit.el (widget-default-active): Obey `:always-active'. (widget-documentation-string-value-create): Set `:always-active'. Index: wid-edit.el =================================================================== RCS file: /gd/gnu/cvsroot/emacs/lisp/wid-edit.el,v retrieving revision 1.64 diff -c -r1.64 wid-edit.el *** wid-edit.el 2000/02/16 13:25:52 1.64 --- wid-edit.el 2000/05/01 13:13:50 *************** *** 1539,1548 **** (defun widget-default-active (widget) "Return t iff this widget active (user modifiable)." ! (and (not (widget-get widget :inactive)) ! (let ((parent (widget-get widget :parent))) ! (or (null parent) ! (widget-apply parent :active))))) (defun widget-default-deactivate (widget) "Make WIDGET inactive for user modifications." --- 1539,1549 ---- (defun widget-default-active (widget) "Return t iff this widget active (user modifiable)." ! (or (widget-get widget :always-active) ! (and (not (widget-get widget :inactive)) ! (let ((parent (widget-get widget :parent))) ! (or (null parent) ! (widget-apply parent :active)))))) (defun widget-default-deactivate (widget) "Make WIDGET inactive for user modifications." *************** *** 2860,2865 **** --- 2861,2867 ---- widget 'visibility :help-echo "Show or hide rest of the documentation." :off "More" + :always-active t :action 'widget-parent-action shown) buttons)