From df3e046e63aa9dc6a5647793d895e8e2beab2b10 Mon Sep 17 00:00:00 2001
From: Eva <eva.krebs@hpi.de>
Date: Thu, 26 Oct 2023 21:46:55 +0200
Subject: [PATCH] no tmp variable

---
 SwaImageConfiguration.st | 14 ++++++--------
 1 file changed, 6 insertions(+), 8 deletions(-)

diff --git a/SwaImageConfiguration.st b/SwaImageConfiguration.st
index 528c06e..897573b 100644
--- a/SwaImageConfiguration.st
+++ b/SwaImageConfiguration.st
@@ -1,5 +1,5 @@
 "-=-=-=-=-="
-|progdir base options tmpCode|
+|progdir base options|
 
 "Initial Setup"
 FileStream startUp: true.
@@ -166,8 +166,9 @@ 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.""
+
+SystemWindow compile: 'filterEvent: aKeyboardEvent for: anObject
+	"Provide keyboard shortcuts."
 
 	aKeyboardEvent isKeystroke
 		ifFalse: [^ aKeyboardEvent].
@@ -187,16 +188,14 @@ Utilities setAuthorInitials: 'hpi'. "changed at end"
 		aKeyboardEvent keyCharacter caseOf: {
 			[Character escape] -> [self world findWindow: aKeyboardEvent].
 		} otherwise: [^ aKeyboardEvent ""no hit""].
-		^ aKeyboardEvent ignore ""hit!""].
+		^ aKeyboardEvent ignore "hit!"].
 
 	^ aKeyboardEvent "no hit"'.
 
-SystemWindow compile: tmpCode."
-
 "-=-=-=-=-="
 "Remove Git Updates from PreferenceWizard as we use a special git version"
 	
-tmpCode := 'initializePage99ExtraPackages
+PreferenceWizardMorph compile: 'initializePage99ExtraPackages
 	"Let the user install extra packages."
 
 	| currentPage packagesList installButton |
@@ -251,7 +250,6 @@ tmpCode := 'initializePage99ExtraPackages
 	
 	^ currentPage'.
 
-PreferenceWizardMorph compile: tmpCode.
 	
 "-=-=-=-=-="