Fix errorcode status

This commit is contained in:
Jan Schneider 2020-01-06 21:12:54 +01:00
parent 301d5079d6
commit 2187987f48
1 changed files with 1 additions and 1 deletions

View File

@ -234,7 +234,7 @@ variable content_type "application/json"
if [catch {process} result] {
set status 500
if { $errorCode != "NONE" } {
if { [regexp {^\d+$} $errorCode ] } {
set status $errorCode
}
puts "Content-Type: ${content_type}"