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]