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

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

Author: piers
Date: Mon Jun  4 18:39:02 2007
New Revision: 4058

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

Log:
Reduced Video windows borders to minimum (ie zero) - one just needs to tell the Window Manager to not decorate and you've got pure video windows. There seems to be a 2 pixel slice at the bottom of the window that won't go away though...


Modified: vic/branches/mpeg4/tcl/ui-windows.tcl
==============================================================================
--- vic/branches/mpeg4/tcl/ui-windows.tcl	(original)
+++ vic/branches/mpeg4/tcl/ui-windows.tcl	Mon Jun  4 18:39:02 2007
@@ -189,13 +189,13 @@
 	}
 	set w .vw$uid
 	toplevel $w -class Vic \
-		-visual "[winfo visual .top] [winfo depth .top]" 
+		-visual "[winfo visual .top] [winfo depth .top]" -padx 0 -pady 0
 	catch "wm resizable $w false false"
 	#
 	# make windows become x-y resizeable
 	#
 	#catch "wm resizable $w true false"
-	frame $w.frame
+	frame $w.frame -padx 0 -pady 0 
 
 
 	global size$w userwin_x userwin_y userwin_size