From 8ab25384c4108b04d6e32af3e9ea660d179435d6 Mon Sep 17 00:00:00 2001 From: Eduardo Cavazos <dharmatech@finkelstein.stackeffects.info> Date: Fri, 11 Jul 2008 13:27:04 -0500 Subject: [PATCH] builder.util: remove old code --- extra/builder/util/util.factor | 8 -------- 1 file changed, 8 deletions(-) diff --git a/extra/builder/util/util.factor b/extra/builder/util/util.factor index 320f0e0448..47db4c52c9 100644 --- a/extra/builder/util/util.factor +++ b/extra/builder/util/util.factor @@ -41,14 +41,6 @@ DEFER: to-strings : host-name* ( -- name ) host-name "." split first ; -! : datestamp ( -- string ) -! now `{ ,[ dup timestamp-year ] -! ,[ dup timestamp-month ] -! ,[ dup timestamp-day ] -! ,[ dup timestamp-hour ] -! ,[ timestamp-minute ] } -! [ pad-00 ] map "-" join ; - : datestamp ( -- string ) now { year>> month>> day>> hour>> minute>> } <arr>