From ae47899079a448b2d71101d4b21c8e9409d82e34 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Mon, 23 Mar 2020 00:34:28 +0100 Subject: Remove deprecated get-time. --- tests/datetime-util.scm | 9 +-------- 1 file changed, 1 insertion(+), 8 deletions(-) (limited to 'tests') diff --git a/tests/datetime-util.scm b/tests/datetime-util.scm index ec5da552..4ba432ca 100644 --- a/tests/datetime-util.scm +++ b/tests/datetime-util.scm @@ -1,5 +1,5 @@ (((datetime) date time) - ((datetime util) month-stream in-date-range? time->string) + ((datetime util) month-stream in-date-range?) ((srfi srfi-41) stream->list stream-take )) @@ -24,10 +24,3 @@ (not ((in-date-range? #2020-01-01 #2020-02-29) #2018-02-02))) - -(test-equal "time fmt default" - "10:20:30" (time->string #10:20:30)) - -(test-equal "time fmt custom" - "103020" (time->string #10:20:30 "~H~S~M")) - -- cgit v1.2.3