suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix find-seconds error reporting to say "find-seconds" instead

Browse Source 
of "find-secs"
This commit is contained in:
Robby Findler 2013-02-03 07:27:42 -06:00
parent 573924e3ac
commit 9c3afd455a
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/racket/date.rkt
View File

@ -272,7 +272,7 @@
(define (find-seconds sec min hour day month year [local-time? #t]) (define (find-seconds sec min hour day month year [local-time? #t])
(define (signal-error msg) (define (signal-error msg)
(error 'find-secs (string-append (error 'find-seconds (string-append
msg msg
" (inputs: ~a ~a ~a ~a ~a ~a)") " (inputs: ~a ~a ~a ~a ~a ~a)")
sec min hour day month year)) sec min hour day month year))