Tk Library Source Code

Artifact [3504a125fe]
Login

Artifact 3504a125fe11492cd8d32a1b4ef3fb6fc3d41b99:

Attachment "patch-examples_plotchart_testfunc_tcl" to ticket [750b78f0c0] added by stwo 2013-09-18 15:48:13.
$OpenBSD$
--- examples/plotchart/testfunc.tcl.orig	Sun Aug  4 10:34:40 2013
+++ examples/plotchart/testfunc.tcl	Sun Aug  4 10:42:04 2013
@@ -1,7 +1,12 @@
+#! /bin/sh
+# The next line restarts with tclsh \
+exec tclsh "$0" ${1+"$@"}
+
+package require Tk
+
 # testfunc.tcl --
 #     Test the plotfunc method
 #
-source plotchart.tcl
 package require Plotchart
 
 grid [canvas .c -width 500 -height 500]