adapt calls of make-error-response: remove tautologous description of errors

This commit is contained in:
vibr 2004-07-30 22:26:50 +00:00
parent 7c7be57a22
commit 1bdac52ad6
1 changed files with 0 additions and 2 deletions

View File

@ -154,7 +154,6 @@
(values #f
(apply make-error-response (status-code bad-request)
#f ; No request yet.
"Request parsing error -- report to client maintainer."
(condition-stuff c))))
((not (and (exception? c)
(eq? (exception-reason c)
@ -164,7 +163,6 @@
(values #f
(apply make-error-response (status-code internal-error)
#f ; don't know
"Internal error occured while processing request"
c)))
(else
(decline))))