[Sumover-dev] [svn commit] r4706 - vic/branches/mpeg4/tcl

[sumover-dev at cs.ucl.ac.uk]

Author: douglask
Date: Mon Mar 22 08:37:35 2010
New Revision: 4706

Modified:
   vic/branches/mpeg4/tcl/ui-ctrlmenu.tcl

Log:
Fix for VIC's Port and Signal button with MacOS X Tcl/Tk 8.5


Modified: vic/branches/mpeg4/tcl/ui-ctrlmenu.tcl
==============================================================================
--- vic/branches/mpeg4/tcl/ui-ctrlmenu.tcl	(original)
+++ vic/branches/mpeg4/tcl/ui-ctrlmenu.tcl	Mon Mar 22 08:37:35 2010
@@ -1802,10 +1802,10 @@
 	# is called otherwise the channel device's input may be busy
 	if {[windowingsystem] == "aqua"} {
 		if {$::tk_version > 8.4 && [windowingsystem] != "x11"} {
-			$portButton instate {active} {
+			$portButton instate {!disabled} {
 				$grabber port $inputPort
 			}
-			$typeButton instate {active} {
+			$typeButton instate {!disabled} {
 				$grabber type $inputType
 			}
 		} else {