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

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

Author: douglask
Date: Fri Jul 31 14:40:37 2009
New Revision: 4498

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

Log:
Info button wasn't working for non-VIC streams that didn't have a "note" field, because [resource background] wasn't returning any value.


Modified: vic/branches/mpeg4/tcl/ui-stats.tcl
==============================================================================
--- vic/branches/mpeg4/tcl/ui-stats.tcl	(original)
+++ vic/branches/mpeg4/tcl/ui-stats.tcl	Fri Jul 31 14:40:37 2009
@@ -209,7 +209,7 @@
 	if { $note != "" } {
 		set bg [resource infoHighlightColor]
 	} else {
-		set bg [resource background]
+		set bg [$w.title.srcid cget -bg]
 	}
 	$w.title.note configure -background $bg
 }