Skip to content

Commit

Permalink
delete w shortcut
Browse files Browse the repository at this point in the history
  • Loading branch information
ekrebs5 authored Oct 27, 2023
1 parent 67a4f36 commit 9c35a2a
Showing 1 changed file with 0 additions and 23 deletions.
23 changes: 0 additions & 23 deletions SwaImageConfiguration.st
Original file line number Diff line number Diff line change
Expand Up @@ -167,30 +167,7 @@ Utilities setAuthorInitials: 'hpi'. "changed at end"
"-=-=-=-=-="
"w shortcut to delete windows - experimental for SWA WiSe 23/24"

(Smalltalk at: #SystemWindow) compile: 'filterEvent: aKeyboardEvent for: anObject
"Provide keyboard shortcuts."

aKeyboardEvent isKeystroke
ifFalse: [^ aKeyboardEvent].
aKeyboardEvent hand halo ifNotNil: [ : halo | halo target isSystemWindow ifTrue: [ aKeyboardEvent hand removeHalo ] ].
aKeyboardEvent commandKeyPressed ifTrue: [
aKeyboardEvent keyCharacter caseOf: {
[$\] -> [self class sendTopWindowToBack].
[Character escape] -> [self class deleteTopWindow].
[$w] -> [self class deleteTopWindow].
[$/] -> [self class bringWindowUnderHandToFront].
} otherwise: [^ aKeyboardEvent "no hit"].
^ aKeyboardEvent ignore "hit!"].
aKeyboardEvent controlKeyPressed ifTrue: [
aKeyboardEvent keyCharacter caseOf: {
[Character escape] -> [self world findWindow: aKeyboardEvent].
} otherwise: [^ aKeyboardEvent ""no hit""].
^ aKeyboardEvent ignore "hit!"].
^ aKeyboardEvent "no hit"'.

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

0 comments on commit 9c35a2a

Please sign in to comment.