Changeset 790 for trunk/instedit.tcl

Timestamp:

Dec 4, 2009 5:12:04 PM (13 years ago)

Author:

toby

Message:

# on 2004/05/04 17:18:41, toby did:
fix ipola buttons ("None" was broken)
disable KRATIO as it is currently unused

File:

• trunk/instedit.tcl (modified) (2 diffs, 3 props)

trunk/instedit.tcl

@@ -220 +220 @@
             -column [incr col] -row 7 -sticky w
     grid [radiobutton $bnkfr.c7c -text "None" \
-            -variable instdatr(ipola$b) -value 2] \
+            -variable instdat(ipola$b) -value 2] \
             -column [incr col] -row 7 -sticky w
     grid [label $bnkfr.l7a -text "Polarization\nFraction:" \
@@ -569 +569 @@
         $frame.$w config -fg $color
     }
+    # for now leave kratio gray, since the value is not used
+    $frame.e4f config -state disabled -fg gray
 }