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


------------------------------------------------------------------------------
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

Reply via email to