2009/1/18 Israel Chauca Fuentes <[email protected]>
> I forgot to modify the flag radiobuttons in the Header Search window, here
> is the patch:
>
> --- tcl/search/header.tcl 11 Jan 2009 21:04:09 -0000 1.16
> +++ tcl/search/header.tcl 18 Jan 2009 22:26:47 -0000
> @@ -346,14 +346,14 @@
> set lab [ttk::label $w.flags.l$var -textvar ::tr($var) -font
> font_Small]
> grid $lab -row $row -column $col -sticky e
> incr col
> - grid [radiobutton $w.flags.yes$var -variable sHeaderFlags($var) -ind 0
> -value yes -text $::tr(Yes) -padx 2 -pady 0 -font font_Small] \
> - -row $row -column $col
> + grid [ttk::radiobutton $w.flags.yes$var -variable sHeaderFlags($var) \
> + -value yes -text $::tr(Yes)] -row $row -column $col
> incr col
> - grid [radiobutton $w.flags.no$var -variable sHeaderFlags($var) -ind 0
> -value no -text $::tr(No) -padx 2 -pady 0 -font font_Small] \
> - -row $row -column $col
> + grid [ttk::radiobutton $w.flags.no$var -variable sHeaderFlags($var) \
> + -value no -text $::tr(No)] -row $row -column $col
> incr col
> - grid [radiobutton $w.flags.both$var -variable sHeaderFlags($var) -ind
> 0 -value both -text $::tr(Both) -padx 2 -pady 0 -font font_Small] \
> - -row $row -column $col
> + grid [ttk::radiobutton $w.flags.both$var -variable sHeaderFlags($var)
> \
> + -value both -text $::tr(Both)] -row $row -column $col
> incr count
> incr col -3
> incr row
>
>
Done.
Pascal
------------------------------------------------------------------------------
This SF.net email is sponsored by:
SourcForge Community
SourceForge wants to tell your story.
http://p.sf.net/sfu/sf-spreadtheword
_______________________________________________
Scid-users mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/scid-users