| url client result |
url := 'http://ipinfo.io/loc' sstAsUrl.
client := SstHttpClient forTransportScheme: url localEndpointUrl transport.
client startUp.
client configuration receiveTimeout: 10000.
result := client get: url.
result isSstError
ifTrue: [ result errorObject = 'Input Stream Empty'
ifTrue: [ self error: 'Timeout reached'. ]
ifFalse: [
"Generic Sst Error"
result raise
]
]
ifFalse: [
"Everything OK"
result basicContents asString inspect.
].
client shutDown.
--
You received this message because you are subscribed to the Google Groups "VAST Community Forum" group.
To unsubscribe from this group and stop receiving emails from it, send an email to va-smalltalk...@googlegroups.com.
To view this discussion visit https://groups.google.com/d/msgid/va-smalltalk/68fc70e8-1447-4bfd-9656-359982f71bc3n%40googlegroups.com.
| |||||||||||||||||
|