Tk Library Source Code

Artifact b3051002c62e66b14238f5d746437b4de3165435:

$OpenBSD$
--- examples/controlwidget/demo-tachometer.tcl.orig	Sun Oct 27 20:53:15 2013
+++ examples/controlwidget/demo-tachometer.tcl	Sun Oct 27 20:53:26 2013
@@ -36,7 +36,7 @@ proc main { argc argv } \
     grid .t1 .s1 .t2 .s2 .b -padx 2 -pady 2
     wm deiconify .
 
-    console show
+    catch { console show }
 
 
     vwait forever
$OpenBSD$
--- examples/plotchart/testtable.tcl.orig	Sun Oct 27 20:52:18 2013
+++ examples/plotchart/testtable.tcl	Sun Oct 27 20:52:30 2013
@@ -33,7 +33,7 @@ proc setColor {table widget row col value} {
 # Command must already exist ...
 $t formatcommand setColor
 
-console show
+catch { console show }
 $t title "Demonstration of table charts"
 $t separator
 
$OpenBSD: patch-modules_plotchart_plotcontour_tcl,v 1.1.1.1 2009/03/18 09:10:27 sthen Exp $
--- modules/plotchart/plotcontour.tcl.orig	Sun Oct 27 23:27:01 2013
+++ modules/plotchart/plotcontour.tcl	Sun Oct 27 23:28:41 2013
@@ -1541,7 +1541,7 @@ proc ::Plotchart::colorMap {cmap} {
 
         default {
             if {[string is alpha $cmap] == 1} {
-                puts "Colormap : Unknown colorMapType, $cmap.  Using JET"
+#debug#                puts "Colormap : Unknown colorMapType, $cmap.  Using JET"
                 set colorMapType jet
 
             } else {
$OpenBSD$
--- modules/plotchart/xyplot.tcl.orig	Sun Oct 27 23:55:10 2013
+++ modules/plotchart/xyplot.tcl	Sun Oct 27 23:55:17 2013
@@ -549,7 +549,7 @@ proc xyplot::cget { path option args } {
 }
 
 # Test
-if {1} {
+if {0} {
 set xydata1 {}
 set xydata2 {}
 set xydata3 {}