Review comments

repository/Seaside-Session.package/WASessionContinuation.class/instance/handle..st

@@ -2,5 +2,5 @@ handling
 handle: aRequestContext
 	"Resume processing of a request. To ensure valid application state restore all registered states."
 
-	self states restore.
+	self restoreState.
 	self withUnregisteredHandlerDo: [ super handle: aRequestContext ]

repository/Seaside-Session.package/WASessionContinuation.class/instance/restoreState.st

@@ -0,0 +1,4 @@
+processing
+restoreState
+
+	self states restore

repository/Seaside-Tests-WebComponents.package/WASingleElementCacheTest.class/instance/testClear.st

@@ -2,4 +2,4 @@ testing
 testClear
 	cache at: 1 put: 'one'.
 	cache clear.
-	self assert: (cache at: 1 ifAbsent: [ 'two' ]) = 'two'.
+	self assert: (cache at: 1 ifAbsent: [ 'two' ]) equals: 'two'.

repository/Seaside-Tests-WebComponents.package/WASingleElementCacheTest.class/instance/testKeyAtValue.st

@@ -1,5 +1,5 @@
 testing
 testKeyAtValue
 	cache at: 1 put: 'one'.
-	self assert: (cache keyAtValue: 'one' ifAbsent: [ 2 ]) = 1.
-	self assert: (cache keyAtValue: 'two' ifAbsent: [ 2 ]) = 2.
+	self assert: (cache keyAtValue: 'one' ifAbsent: [ 2 ]) equals: 1.
+	self assert: (cache keyAtValue: 'two' ifAbsent: [ 2 ]) equals: 2.

repository/Seaside-Tests-WebComponents.package/WASingleElementCacheTest.class/instance/testKeysAndValuesDo.st

@@ -10,4 +10,4 @@ testKeysAndValuesDo
 	cache keysAndValuesDo: [ :key :value |
 		readBack at: key put: value ].
 
-	self assert: readBack = reference
+	self assert: readBack equals: reference

repository/Seaside-Tests-WebComponents.package/WASingleElementCacheTest.class/instance/testSize.st

@@ -1,7 +1,7 @@
 testing
 testSize
-	self assert: cache size = 0.
+	self assert: cache size equals: 0.
 	cache at: 1 put: 'one'.
-	self assert: cache size = 1.
+	self assert: cache size equals: 1.
 	cache at: 2 put: 'two'.
-	self assert: cache size = 1.
+	self assert: cache size equals: 1.

repository/Seaside-Tests-WebComponents.package/WASingleElementCacheTest.class/instance/testStore.st

@@ -5,6 +5,6 @@ testStore
 	WAKeyGenerator
 		use: generator
 		during: [
-			self assert: (cache store: 'key1') = 1.
-			self assert: (cache store: 'key2') = 2.
-			self assert: (cache store: 'key3') = 3 ]
+			self assert: (cache store: 'key1') equals: 1.
+			self assert: (cache store: 'key2') equals: 2.
+			self assert: (cache store: 'key3') equals: 3 ]

repository/Seaside-WebComponents-Core.package/WAWebComponentActionContinuation.class/instance/restoreState.st

@@ -0,0 +1,3 @@
+processing
+restoreState
+	"don't restore states"

repository/Seaside-WebComponents-Examples.package/WAWebComponentsDemoApplication.class/class/initialize.st

@@ -1,4 +1,9 @@
 initialization
 initialize
-	(WAAdmin register: self asApplicationAt: 'examples/web-components')
+	| application |
+	"register such that we do not have the developer tools"
+	application := WAAdmin register: WAApplication at: 'examples/web-components' in: WAAdmin defaultDispatcher.
+	application configuration addParent: WARenderLoopConfiguration instance.
+	application
+		rootClass: self;
 		scriptGeneratorClass: WANullScriptGenerator