emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: :format strings in Custom ending in %h


From: Per Abrahamsen
Subject: Re: :format strings in Custom ending in %h
Date: Thu, 21 Aug 2003 14:22:04 +0200
User-agent: Gnus/5.090007 (Oort Gnus v0.07) Emacs/21.1 (sparc-sun-solaris2.8)

Does this fix the problem?

We should probably always call widget-children-value-delete, as any
widget may have children if they have a long doc string.

-- Per

2003-08-21  Per Abrahamsen  <address@hidden>

        * wid-edit.el (item): Delete children (due to doc-string).


*** wid-edit.el.~1.120.~        Thu Aug 21 14:17:37 2003
--- wid-edit.el Thu Aug 21 14:19:14 2003
***************
*** 1556,1562 ****
    "Constant items for inclusion in other widgets."
    :convert-widget 'widget-value-convert-widget
    :value-create 'widget-item-value-create
!   :value-delete 'ignore
    :value-get 'widget-value-value-get
    :match 'widget-item-match
    :match-inline 'widget-item-match-inline
--- 1556,1562 ----
    "Constant items for inclusion in other widgets."
    :convert-widget 'widget-value-convert-widget
    :value-create 'widget-item-value-create
!   :value-delete 'widget-children-value-delete
    :value-get 'widget-value-value-get
    :match 'widget-item-match
    :match-inline 'widget-item-match-inline

Luc Teirlinck <address@hidden> writes:

> Sorry, my original file had an inconsistency with the defgroup and the
> :group.  The bug is real however and stays with the following
> corrected file.  Only difference:
>
> :group 'nifty-group gets replaced with:
>
> :group 'nifty
>
> ===File ~/customdoc.el======================================
> (defgroup nifty nil
>   "Single item group"
>   :group 'convenience)
>
> (defcustom nifty-var nil
>   "*Nifty doc string."
>   :group 'nifty
>   :type '(choice (const :tag "True"
>                       :format "%t\n%h"
>                       :doc
>                       "True stuff.
> Second line of true stuff."
>                       t)
>                (other :tag "False"
>                       :format "%t\n%h"
>                       :doc
>                       "Falsehoods.
> Second line of falsehoods"
>                       nil)))
>
> ============================================================





reply via email to

[Prev in Thread] Current Thread [Next in Thread]