Fixed at:ifPresent:ifAbsentPut: calls.

hpi-swa-teaching · Jun 13, 2018 · 1a34e00 · 1a34e00
1 parent e2cb2df
commit 1a34e00
Show file tree

Hide file tree

Showing 5 changed files with 7 additions and 7 deletions.
diff --git a/packages/RatPack.package/RPApplication.class/methodProperties.json b/packages/RatPack.package/RPApplication.class/methodProperties.json
@@ -76,8 +76,8 @@
 		"parsedRequestContents" : "lj 5/23/2018 21:50",
 		"parsedRequestContents:" : "lj 5/23/2018 21:51",
 		"persistObjectBy:from:" : "lj 5/3/2018 17:02",
-		"processRequest:" : "lj 6/5/2018 18:54",
 		"postFromRequest:" : "jm 6/1/2018 14:49",
+		"processRequest:" : "lj 6/5/2018 18:54",
 		"redirectBack" : "RS 5/18/2015 09:43",
 		"redirectTo:" : "lj 6/5/2018 17:55",
 		"registerModel:" : "LB 7/16/2015 12:08",

diff --git a/packages/RatPack.package/RPTestMiddleware.class/instance/incrementPostHookCounter..st b/packages/RatPack.package/RPTestMiddleware.class/instance/incrementPostHookCounter..st
@@ -3,4 +3,4 @@ incrementPostHookCounter: anEnv
 
 	anEnv at: #postHookCounter 
 		ifPresent: [ :counter | anEnv at: #postHookCounter put: counter +1. ]
-		ifAbsentPut: [ 1 ].
+		ifAbsent: [ anEnv at: #postHookCounter put: 1 ].
diff --git a/packages/RatPack.package/RPTestMiddleware.class/instance/incrementPreHookCounter..st b/packages/RatPack.package/RPTestMiddleware.class/instance/incrementPreHookCounter..st
@@ -3,4 +3,4 @@ incrementPreHookCounter: anEnv
 
 	anEnv at: #preHookCounter 
 		ifPresent: [ :counter | anEnv at: #preHookCounter put: counter +1. ]
-		ifAbsentPut: [ 1 ].
+		ifAbsent: [ anEnv at: #preHookCounter put: 1 ].
diff --git a/packages/RatPack.package/RPTestMiddleware.class/instance/incrementTimer..st b/packages/RatPack.package/RPTestMiddleware.class/instance/incrementTimer..st
@@ -3,4 +3,4 @@ incrementTimer: anEnv
 
 	anEnv at: #time
 		ifPresent: [ :time | anEnv at: #time put: time +1]
-		ifAbsentPut: [ 1 ].
+		ifAbsent: [ anEnv at: #time put: 1 ].
diff --git a/packages/RatPack.package/RPTestMiddleware.class/methodProperties.json b/packages/RatPack.package/RPTestMiddleware.class/methodProperties.json
@@ -2,8 +2,8 @@
 	"class" : {
 		"blacklist" : "lj 5/25/2018 19:48" },
 	"instance" : {
-		"incrementPostHookCounter:" : "lj 5/30/2018 14:50",
-		"incrementPreHookCounter:" : "lj 5/30/2018 14:50",
-		"incrementTimer:" : "lj 5/30/2018 14:51",
+		"incrementPostHookCounter:" : "re 6/13/2018 14:20",
+		"incrementPreHookCounter:" : "re 6/13/2018 14:20",
+		"incrementTimer:" : "re 6/13/2018 14:20",
 		"postHook:" : "lj 5/30/2018 14:52",
 		"preHook:" : "lj 5/30/2018 14:52" } }