--- scripts/cm2rem.tcl.orig	Fri Feb 18 05:45:38 2000
+++ scripts/cm2rem.tcl	Sat Mar 31 00:13:18 2007
@@ -16,7 +16,7 @@
 # $Id: patch-scripts-cm2rem,v 1.3 2007/04/02 19:24:48 martynas Exp $
 
 # the next line restarts using tclsh \
-exec tclsh "$0" "$@"
+exec tclsh8.4 "$0" "$@"
 
 set i 0
 foreach month {January February March April May June
