Skip to content

Commit

Permalink
try without w closing
Browse files Browse the repository at this point in the history
  • Loading branch information
ekrebs5 committed Oct 26, 2023
1 parent 1379929 commit bad94e1
Showing 1 changed file with 8 additions and 8 deletions.
16 changes: 8 additions & 8 deletions SwaImageConfiguration.st
Original file line number Diff line number Diff line change
Expand Up @@ -166,8 +166,8 @@ Utilities setAuthorInitials: 'hpi'. "changed at end"

"-=-=-=-=-="
"w shortcut to delete windows - experimental for SWA WiSe 23/24"
tmpCode := 'filterEvent: aKeyboardEvent for: anObject
"Provide keyboard shortcuts."
"tmpCode := 'filterEvent: aKeyboardEvent for: anObject
""Provide keyboard shortcuts.""
aKeyboardEvent isKeystroke
ifFalse: [^ aKeyboardEvent].
Expand All @@ -186,18 +186,18 @@ tmpCode := 'filterEvent: aKeyboardEvent for: anObject
aKeyboardEvent controlKeyPressed ifTrue: [
aKeyboardEvent keyCharacter caseOf: {
[Character escape] -> [self world findWindow: aKeyboardEvent].
} otherwise: [^ aKeyboardEvent "no hit"].
^ aKeyboardEvent ignore "hit!"].
} otherwise: [^ aKeyboardEvent ""no hit""].
^ aKeyboardEvent ignore ""hit!""].
^ aKeyboardEvent "no hit"'.
SystemWindow compile: tmpCode.
SystemWindow compile: tmpCode."

"-=-=-=-=-="
"Remove Git Updates from PreferenceWizard as we use a special git version"

"tmpCode := 'initializePage99ExtraPackages
""Let the user install extra packages.""
tmpCode := 'initializePage99ExtraPackages
"Let the user install extra packages."
| currentPage packagesList installButton |
currentPage := self createPage.
Expand Down Expand Up @@ -251,7 +251,7 @@ SystemWindow compile: tmpCode.
^ currentPage'.

PreferenceWizardMorph compile: tmpCode."
PreferenceWizardMorph compile: tmpCode.

"-=-=-=-=-="

Expand Down

0 comments on commit bad94e1

Please sign in to comment.