Tobias Pape uploaded a new version of WebClient-Tests to project The Trunk: http://source.squeak.org/trunk/WebClient-Tests-topa.50.mcz
==================== Summary ====================
Name: WebClient-Tests-topa.50 Author: topa Time: 3 July 2017, 4:14:20.605266 pm UUID: 2acac067-6f72-4b30-b000-689349b5733b Ancestors: WebClient-Tests-jr.49
[WebServer] Since '/' is treated as default entry point, expecting an error is wrong here.
=============== Diff against WebClient-Tests-jr.49 ===============
Item was changed: ----- Method: WebClientServerTest>>testListenOnInterface (in category 'tests - misc') ----- testListenOnInterface "Test that listening on a particular interface listens only on that interface"
| localHostAddr resp localHostName client | server destroy. "kill old server"
localHostAddr := NetNameResolver localHostAddress. localHostAddr asByteArray = #(127 0 0 1) asByteArray ifTrue:[^self]. "skip test"
localHostName := NetNameResolver stringFromAddress: localHostAddr.
server := WebServer new listenOn: self port interface: localHostAddr. server addService: '/' action:[:req| req send200Response: 'ok'].
client := WebClient new. client timeout: 1. - self should:[resp := client httpGet: self localHostUrl, '/test'] raise: Error.
resp := client httpGet: 'http://', localHostName, ':', self port asString, '/test'. self assert: resp code = 200. self assert: resp content = 'ok'. !