From 238f2a73bfc446a6bafa08ee033d1af5655eff7e Mon Sep 17 00:00:00 2001
From: Tom Beckmann <tomjonabc@gmail.com>
Date: Fri, 27 Oct 2023 09:33:13 +0100
Subject: [PATCH] Revert "remove double double-quote from systemwindow compile"

This reverts commit ee7157b8970b3607b5c9e2ee0e66478dd75fe610.
---
 SwaImageConfiguration.st | 21 ---------------------
 1 file changed, 21 deletions(-)

diff --git a/SwaImageConfiguration.st b/SwaImageConfiguration.st
index def604f..ebc8b2b 100644
--- a/SwaImageConfiguration.st
+++ b/SwaImageConfiguration.st
@@ -167,28 +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"