smalltalk
/
osmo-st-all
Archived
1
0
Fork 0
Code Releases Activity

Close file patch from Paolo Bonzini in FileHandler.st

This commit is contained in:
Nicolas Petton 2009-07-25 23:55:19 +00:00
parent 31b741d52d
commit 93f968a893
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
Core/RequestHandlers/FileHandler.st
View File

@ -526,8 +526,10 @@ RequestHandler subclass: FileHandler [
produceResponse [
<category: 'responding'>
self respond: [:response |
response nextPutAll: file readStream binary contentsStream.
self respond: [:response || stream |
stream := file readStream.
[response nextPutAll: stream binary contentsStream]
ensure: [stream close].
response contentType: (self mimeTypeFor: file filename).
self addAllowHeaderTo: response.
self session useCookies ifTrue: [