The Trunk: System-mt.811.mcz

Marcel Taeumel uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-mt.811.mcz

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

Name: System-mt.811
Author: mt
Time: 6 April 2016, 11:16:15.706625 am
UUID: 582451db-f36b-ca41-8510-d3b5505f8e8d
Ancestors: System-mt.810

Make start-up scripts work also in othere GUIs.

=============== Diff against System-mt.810 ===============

Item was changed:
  ----- Method: AutoStart class>>startUp: (in category 'initialization') -----
  startUp: resuming
  "The image is either being newly started (resuming is true), or it's just been snapshotted.
  If this has just been a snapshot, skip all the startup stuff."
 
  | startupParameters launchers |
  self active ifTrue: [^self].
  self active: true.
  resuming ifFalse: [^self].
 
  HTTPClient determineIfRunningInBrowser.
  startupParameters := Smalltalk namedArguments.
  (startupParameters includesKey: 'apiSupported' asUppercase )
  ifTrue: [
  HTTPClient browserSupportsAPI: ((startupParameters at: 'apiSupported' asUppercase) asUppercase = 'TRUE').
  HTTPClient isRunningInBrowser
  ifFalse: [HTTPClient isRunningInBrowser: true]].
  "Some images might not have the UpdateStream package."
  ((self respondsTo: #checkForUpdates) and: [self checkForUpdates]) ifTrue: [^self].
  self checkForPluginUpdate.
  launchers := self installedLaunchers collect: [:launcher |
  launcher new].
  launchers do: [:launcher |
  launcher parameters: startupParameters].
  launchers do: [:launcher |
+ Project current addDeferredUIMessage: [launcher startUp]]!
- Smalltalk at: #WorldState ifPresent: [ :ws | ws addDeferredUIMessage: [launcher startUp]]]!