--- dateeditor.C-	2006-04-28 21:01:17.000000000 -0700
+++ dateeditor.C	2006-04-28 21:01:45.000000000 -0700
@@ -148,12 +148,12 @@
 	char buffer[20];
 	sprintf(buffer, "%d", list[i].date.EpochDays());
 	if (Tcl_SetVar(tcl, dvar, buffer, 0) == NULL) {
-	    free((char*) strlist);
+	    Tcl_Free((char*) strlist);
 	    TCL_Error(tcl, "could not set loop variable");
 	}
 
 	if (Tcl_SetVar(tcl, hvar, (char*)hilite, 0) == NULL) {
-	    free((char*) strlist);
+	    Tcl_Free((char*) strlist);
 	    TCL_Error(tcl, "could not set loop variable");
 	}
 
@@ -165,11 +165,11 @@
 	if (result == TCL_BREAK) break;
 
 	// Error of some sort
-	free((char*) strlist);
+	Tcl_Free((char*) strlist);
 	return result;
     }
 
-    free((char*) strlist);
+    Tcl_Free((char*) strlist);
     TCL_Return(tcl, "");
 }
 
