--- /tmp/rosegarden-2.1/petal/pattern.tcl	Wed Oct 22 22:18:28 1997
+++ ./petal/pattern.tcl	Fri May 14 17:22:36 1999
@@ -1,7 +1,7 @@
 #!/bin/sh
 # FilterName: Instantiate Pattern
-# the next line restarts using tclsh \
-exec tclsh "$0" "$@"
+# the next line restarts using tclsh8.0 \
+exec tclsh8.0 "$0" "$@"
 
 # Pattern instantiator (very dumb)
 # Main staff is the pattern,