Launcher `open` - explicitly disable fullscreen mode
Also, "beOpenedInWorld" seems ambiguous and possibly misledaing, so change to "beOpenedAsWorld"
MODIFY
src/PharoLauncher-Spec2/PharoLauncherApplication.class.st
src/PharoLauncher-Spec2/PharoLauncherApplication.class.st
@@ -12,8 +12,8 @@ Class {
'imageRepository',
'templateRepository',
'imagesPresenter',
- 'openInWorld',
- 'scriptsDirectory'
+ 'scriptsDirectory',
+ 'openAsWorld'
],
#classVars : [
'Default',
@@ -121,14 +121,16 @@ PharoLauncherApplication class >> menuCommandOn: aBuilder [
{ #category : #opening }
PharoLauncherApplication class >> open [
<script>
- ^ self default run
+ ^ self default
+ openAsWorld: false;
+ run
]
{ #category : #opening }
PharoLauncherApplication class >> openFull [
<script>
^ self default
- beOpenedInWorld;
+ beOpenedAsWorld;
run
]
@@ -199,8 +201,8 @@ PharoLauncherApplication class >> templatesClearedOnStartup: aBoolean [
]
{ #category : #configuring }
-PharoLauncherApplication >> beOpenedInWorld [
- openInWorld := true
+PharoLauncherApplication >> beOpenedAsWorld [
+ self openAsWorld: true
]
{ #category : #accessing }
@@ -226,7 +228,7 @@ PharoLauncherApplication >> imageRepositoryChanged: newImage [
{ #category : #initialization }
PharoLauncherApplication >> initialize [
- openInWorld := false.
+ openAsWorld := false.
imageRepository := PhLDirectoryBasedImageRepository default.
self templatesClearedOnStartup
ifTrue: [ self class resetTemplateRepository ].
@@ -249,6 +251,11 @@ PharoLauncherApplication >> launchConfigurationEdited: aLaunchConfiguration [
ifFalse: [ imagesPresenter selectConfiguration: aLaunchConfiguration ].
]
+{ #category : #configuring }
+PharoLauncherApplication >> openAsWorld: aBoolean [
+ openAsWorld := aBoolean
+]
+
{ #category : #initialization }
PharoLauncherApplication >> resetTemplateRepository [
templateRepository := TemplateRepository
@@ -259,7 +266,7 @@ PharoLauncherApplication >> resetTemplateRepository [
PharoLauncherApplication >> run [
| presenterClass |
self initializeImagesPresenter.
- presenterClass := openInWorld
+ presenterClass := openAsWorld
ifTrue: [ SpWorldPresenter ]
ifFalse: [ imagesPresenter defaultWindowPresenterClass ].
self

Launcher `open` - explicitly disable fullscreen mode

Also, "beOpenedInWorld" seems ambiguous and possibly misledaing, so change to "beOpenedAsWorld"