scsh-conservatory
/
sunet
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

get-numeric-field-value: correct error message

This commit is contained in:
vibr 2004-08-15 11:06:39 +00:00
parent 44100cbf5e
commit 8bf71fc3a5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
scheme/lib/sunet-utilities.scm
View File

@ -102,7 +102,7 @@
(if (and (integer? field-value) (>= field-value 0)) ;;yes, field value contained only digits (if (and (integer? field-value) (>= field-value 0)) ;;yes, field value contained only digits
field-value field-value
(http-error (status-code bad-request) req (http-error (status-code bad-request) req
(format #f "~A header contained characters other than digits" field-name)))) (format #f "~A header contained characters other than digits or whitespace between digits" field-name))))
#f))) #f)))