fixed wrong # of args to internal err function
svn: r8650
This commit is contained in:
parent
44e99eed6e
commit
b69384799a
|
@ -31,7 +31,7 @@
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(begin0 (read)
|
(begin0 (read)
|
||||||
(unless (eof-object? (read))
|
(unless (eof-object? (read))
|
||||||
(err "has multiple expressions" file)))))))
|
(err "has multiple expressions")))))))
|
||||||
(and (file-exists? file)
|
(and (file-exists? file)
|
||||||
(match (contents)
|
(match (contents)
|
||||||
[(list 'module 'info
|
[(list 'module 'info
|
||||||
|
|
Loading…
Reference in New Issue
Block a user