[Pkg] Monticello Public: Monticello.impl-cds.573.mcz

squeak-dev-noreply at lists.squeakfoundation.org squeak-dev-noreply at lists.squeakfoundation.org
Tue Sep 23 18:20:00 UTC 2008

C. David Shaffer uploaded a new version of Monticello.impl to project Monticello Public:

==================== Summary ====================

Name: Monticello.impl-cds.573
Author: cds
Time: 19 September 2008, 7:43:04 am
UUID: 23a5a8b7-3e13-4f40-929f-9d6f9c0af9a5
Ancestors: Monticello.impl-kph.572

Patched MCHttpRepository>>writeStreamForFileNamed:replace:do: to consider any "2xx" HTTP status code to indicate success.  This is needed, for example, since many WebDAV servers answer 204 (NO CONTENT) to PUT requests which are updating an existing file.  See http://www.w3.org/Protocols/HTTP/HTRESP.html.

=============== Diff against Monticello.impl-kph.572 ===============

Item was changed:
  ----- Method: MCHttpRepository>>writeStreamForFileNamed:replace:do: (in category 'required') -----
  writeStreamForFileNamed: aString replace: ignoreBoolean do: aBlock
  	| stream response statusLine code |
  	stream := RWBinaryOrTextStream on: String new.
  	aBlock value: stream.
  	response := HTTPSocket
  					httpPut: stream contents
  					to: (self urlForFileNamed: aString)
  					user: self user
  					passwd: self password.
  	statusLine := response copyUpTo: Character cr.
  	code := (statusLine findTokens: ' ') second asInteger.
+ 	(code >= 200 and: [code < 300])
- 	(#(200 201) includes: code)
  			ifFalse: [self error: response].!

More information about the Packages mailing list