Skip to content

Commit f8b0d5c

Browse files
authored
Merge pull request #19645 from guillep/killuim
Cleanup uiManager from Object
2 parents 5fc2643 + 03740d0 commit f8b0d5c

5 files changed

Lines changed: 14 additions & 37 deletions

File tree

src/Morphic-Core/WorldState.class.st

Lines changed: 12 additions & 10 deletions
Original file line numberDiff line numberDiff line change
@@ -184,7 +184,7 @@ WorldState class >> pharoItemsOn: aBuilder [
184184
keyText: 'S';
185185
iconName: #smallSave.
186186
(aBuilder item: #'Save as...')
187-
target: self;
187+
target: aBuilder model;
188188
selector: #saveAs;
189189
help: 'Save the current version of the image on disk under a new name.';
190190
order: 2;
@@ -235,15 +235,6 @@ WorldState class >> saveAndQuit [
235235
]
236236
]
237237

238-
{ #category : 'world menu items' }
239-
WorldState class >> saveAs [
240-
241-
| reference |
242-
reference := self uiManager chooseForSaveFileReference: 'Save Image as?' extensions: #( 'image' ) path: Smalltalk imageFile nextVersion.
243-
244-
reference ifNotNil: [ Smalltalk saveAs: reference parent / (reference basenameWithoutExtension: 'image') ]
245-
]
246-
247238
{ #category : 'world menu items' }
248239
WorldState class >> saveSession [
249240
Cursor write showWhile: [
@@ -772,6 +763,17 @@ WorldState >> runStepMethodsIn: aWorld [
772763
self runLocalStepMethodsIn: aWorld.
773764
]
774765

766+
{ #category : 'menu actions' }
767+
WorldState >> saveAs [
768+
769+
| reference |
770+
reference := worldRenderer world morphicUIManager
771+
chooseForSaveFileReference: 'Save Image as?'
772+
extensions: #( 'image' )
773+
path: Smalltalk imageFile nextVersion.
774+
reference ifNotNil: [ Smalltalk saveAs: reference parent / (reference basenameWithoutExtension: 'image') ]
775+
]
776+
775777
{ #category : 'hands' }
776778
WorldState >> selectHandsToDrawForDamage: damageList [
777779
"Select the set of hands that must be redrawn because either (a) the hand itself has changed or (b) the hand intersects some damage rectangle."

src/SystemCommands-RefactoringSupport/RBRefactoringError.extension.st

Lines changed: 0 additions & 7 deletions
This file was deleted.

src/SystemCommands-RefactoringSupport/RBRefactoringWarning.extension.st

Lines changed: 0 additions & 10 deletions
This file was deleted.

src/SystemCommands-VariableCommands/SycGenerateVariableAccessorsWithLazyInitializationCommand.class.st

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -55,8 +55,8 @@ SycGenerateVariableAccessorsWithLazyInitializationCommand >> isComplexRefactorin
5555
SycGenerateVariableAccessorsWithLazyInitializationCommand >> prepareFullExecutionInContext: aToolContext [
5656

5757
super prepareFullExecutionInContext: aToolContext.
58-
variable := aToolContext lastSelectedVariable.
59-
value := self uiManager
58+
variable := aToolContext lastSelectedVariable.
59+
value := aToolContext tool morphicUIManager
6060
request: 'Default value of variable accessor'
6161
initialAnswer: 'nil'
6262
title: 'Default variable''s value'.

src/UIManager/Object.extension.st

Lines changed: 0 additions & 8 deletions
This file was deleted.

0 commit comments

Comments
 (0)