fix find-seconds error reporting to say "find-seconds" instead
of "find-secs"
This commit is contained in:
parent
573924e3ac
commit
9c3afd455a
|
@ -272,7 +272,7 @@
|
|||
|
||||
(define (find-seconds sec min hour day month year [local-time? #t])
|
||||
(define (signal-error msg)
|
||||
(error 'find-secs (string-append
|
||||
(error 'find-seconds (string-append
|
||||
msg
|
||||
" (inputs: ~a ~a ~a ~a ~a ~a)")
|
||||
sec min hour day month year))
|
||||
|
|
Loading…
Reference in New Issue
Block a user