diff --git a/pkgs/racket-test/tests/racket/date.rkt b/pkgs/racket-test/tests/racket/date.rkt new file mode 100644 index 0000000000..30debe01a7 --- /dev/null +++ b/pkgs/racket-test/tests/racket/date.rkt @@ -0,0 +1,9 @@ +#lang racket/base +(require racket/date rackunit) +;; test that German hours & minutes are separated with a colon, not a period +(check-equal? (parameterize ([date-display-format 'german]) + (date->string + (seconds->date + (find-seconds 30 45 2 1 1 1970)) + #t)) + "1. Januar 1970, 02:45")