diff -r a4c3c856b3c8 -r 4447f103d1ff HttpURI.st --- a/HttpURI.st Tue Oct 22 12:20:05 2019 +0200 +++ b/HttpURI.st Tue Oct 22 14:23:19 2019 +0200 @@ -102,6 +102,12 @@ "/ accept:#('*/*') "/ fromDocument:nil. + response isErrorResponse ifTrue:[ + ReadError + raiseRequestWith:response + errorString:('HTTP get of "%1" failed (%2)' bindWith:self asString with:response responseCode). + ]. + headerInfo := response headerInfo. mime := headerInfo at:'content-type' ifAbsent:nil. mime notNil ifTrue:[ @@ -121,7 +127,7 @@ " "Modified: / 18-03-2019 / 10:57:56 / Claus Gittinger" - "Modified (comment): / 22-10-2019 / 12:19:53 / Stefan Vogel" + "Modified: / 22-10-2019 / 12:33:44 / Stefan Vogel" ! ! !HttpURI methodsFor:'testing'! @@ -142,5 +148,9 @@ version ^ '$Header$' +! + +version_CVS + ^ '$Header$' ! !