update date

svn: r14529
This commit is contained in:
Sam Tobin-Hochstadt 2009-04-16 18:33:20 +00:00
parent b1f5b19563
commit b53fda9000

View File

@ -1,7 +1,7 @@
#lang scheme/base
(provide stamp)
(define stamp
(string-append "2mar2009 "
(string-append "14apr2009 "
(let ([s "$URL$"])
(substring
s 6