The Trunk: System-pre.1063.mcz

Patrick Rein uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-pre.1063.mcz

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

Name: System-pre.1063
Author: pre
Time: 9 May 2019, 4:34:28.264225 pm
UUID: 23cc0048-a923-3a4c-b799-4e2c18feadc4
Ancestors: System-dtl.1062

Deprecates classes and methods related to executing Squeak in a web browser through a browser plugin. They can be loaded through the 60Deprecated-NSPlugin-System-Support package.

=============== Diff against System-dtl.1062 ===============

Item was removed:
- HTTPDownloadRequest subclass: #PluginHTTPDownloadRequest
- instanceVariableNames: 'fileStream'
- classVariableNames: ''
- poolDictionaries: ''
- category: 'System-Download'!
-
- !PluginHTTPDownloadRequest commentStamp: '<historical>' prior: 0!
- HTTPBrowserRequest attempts to fetch the contents through a Webbrowser. This works transparently if Squeak is not running in the browser.!

Item was removed:
- ----- Method: PluginHTTPDownloadRequest>>contentStream (in category 'accessing') -----
- contentStream
- semaphore wait.
- fileStream
- ifNotNil: [^ fileStream].
- ^ content
- ifNotNil: [content isString
- ifTrue: [self error: 'Error loading ' , self url printString]
- ifFalse: [content contentStream]]!

Item was removed:
- ----- Method: PluginHTTPDownloadRequest>>contents (in category 'accessing') -----
- contents
- | |
- semaphore wait.
- (content isNil and:[fileStream notNil]) ifTrue:[
- " pos := fileStream position."
- fileStream position: 0.
- content := MIMEDocument content: fileStream upToEnd.
- fileStream close.
- ].
- ^content!

Item was removed:
- ----- Method: PluginHTTPDownloadRequest>>maxAttempts (in category 'accessing') -----
- maxAttempts
- "Return the number of attempts to retry before giving up"
- ^3!

Item was removed:
- ----- Method: PluginHTTPDownloadRequest>>signalAbort (in category 'accessing') -----
- signalAbort
- fileStream ifNotNil: [
- fileStream close].
- fileStream := nil.
- super signalAbort.!

Item was removed:
- ----- Method: PluginHTTPDownloadRequest>>startRetrieval (in category 'accessing') -----
- startRetrieval
- | attempts |
- attempts := self maxAttempts.
- "Note: Only the first request may fail due to not running in a browser"
- url first = $/
- ifTrue: [url := url copyFrom: 2 to: url size].
- fileStream := FileStream requestURLStream: url ifError:[^super startRetrieval].
- [fileStream == nil] whileTrue:[
- attempts := attempts - 1.
- attempts = 0 ifTrue:[^self content:'Error downloading file'].
- fileStream := FileStream requestURLStream: url].
- semaphore signal.!