~hilaire-fernandes/drgeo/trunk

« back to all changes in this revision

Viewing changes to srcCuis/setupDrGeoDevelopment.st

  • Committer: Hilaire Fernandes
  • Date: 2022-08-07 08:27:42 UTC
  • Revision ID: hilaire.fernandes@gmail.com-20220807082742-g4se0ex29lw63nvo
Archives

Show diffs side-by-side

added added

removed removed

Lines of Context:
4
4
Preferences at: #logDebuggerStackToFile put: false.
5
5
Preferences at: #autoNumberUserChanges put: false.
6
6
"Delete all windows but the taskbar"
7
 
self runningWorld doOneCycle.
 
7
self runningWorld doOneCycleNow.
8
8
list := UISupervisor ui submorphs reject: [:aMorph | aMorph is: #TaskbarMorph].
9
9
 list do: [:each | each delete].
10
10
"Adjust font size"
13
13
morph := UISupervisor ui taskbar.
14
14
morph scale: 1/2.
15
15
Display fullScreenMode: true.
16
 
self runningWorld doOneCycle.
 
16
self runningWorld doOneCycleNow.
17
17
Transcript show: 'Hello'.
18
18
"Compute the available free space for windows placement"
19
19
area _ RealEstateAgent maximumUsableArea extendBy: 0 @ morph morphHeight negated.