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

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

Author: douglask
Date: Mon Feb  1 21:51:56 2010
New Revision: 4585

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

Log:
For X11 Tcl/Tk 8.5 VIC, perform query for activebackground used by the video thumbnail. It matches the activebackground colour used by the current Gnome or KDE theme VIC is running under


Modified: vic/branches/mpeg4/tcl/ui-main.tcl
==============================================================================
--- vic/branches/mpeg4/tcl/ui-main.tcl	(original)
+++ vic/branches/mpeg4/tcl/ui-main.tcl	Mon Feb  1 21:51:56 2010
@@ -703,7 +703,7 @@
 	pack $w.r.ctrl -fill x -side top
 	pack $w.r -side left -expand 1 -fill x
 
-	if {$::tk_version > 8.4 && [windowingsystem] ne "x11"} {
+	if {$::tk_version > 8.4} {
 		bind $stamp <Enter> "%W configure -background [$m cget -activebackground]"
 		bind $stamp <Leave> "%W configure -background [$m cget -background]"
 	} elseif {[windowingsystem] eq "aqua"} {