diff --git a/source/Sagan-GemStone/GemStoneTransaction.class.st b/source/Sagan-GemStone/GemStoneTransaction.class.st
index ad48413..32b9b8f 100644
--- a/source/Sagan-GemStone/GemStoneTransaction.class.st
+++ b/source/Sagan-GemStone/GemStoneTransaction.class.st
@@ -20,7 +20,7 @@ GemStoneTransaction >> transact: aBlock [
 			  [
 			  result := aBlock value.
 			  System commitTransaction
-			  ] ifCurtailed: [ result := System abortTransaction ].
+			  ] ifCurtailed: [ System abortTransaction ].
 			  result
 			  ]
 ]