diff --git a/scsh/time1.c b/scsh/time1.c
index 1dd5561..19d4146 100644
--- a/scsh/time1.c
+++ b/scsh/time1.c
@@ -413,6 +413,7 @@ s48_value format_date(s48_value sch_fmt, s48_value sch_sec, s48_value sch_min,
 #endif
     sch_ans = s48_enter_string(target);
     Free(fmt2);
+    Free(target);
     if( oldenv ) revert_env(oldenv);
     return sch_ans;