fix up GemServerRemoteVMTests

GsDevKit · May 28, 2015 · 508330a · 508330a
1 parent cf04667
commit 508330a
Show file tree

Hide file tree

Showing 4 changed files with 8 additions and 6 deletions.
diff --git a/...itory/GsApplicationTools-Test.package/GemServerRemoteVMTests.class/instance/startGems..st b/...itory/GsApplicationTools-Test.package/GemServerRemoteVMTests.class/instance/startGems..st
@@ -8,4 +8,6 @@ startGems: gemServer
           'evaluate on server: abort; /home/gemserver/example --start=Test_Server' ]
     ifFalse: [ 
       gemServer startGems.
-      self waitForStartGems: 'Gems did not start ' , self gemServerName ]
+      self
+        waitForGemServer: gemServer
+        message: 'Gems did not start ' , self gemServerName ]
diff --git a/...Tests.class/instance/waitForStartGems..st → ...ass/instance/waitForGemServer.message..st b/...Tests.class/instance/waitForStartGems..st → ...ass/instance/waitForGemServer.message..st
@@ -1,6 +1,6 @@
 private
-waitForStartGems: message
-  (self gemServer waitForStartGems: 20)
+waitForGemServer: gemServer message: message
+  (gemServer waitForStartGems: 20)
     ifFalse: [ 
       Transcript
         cr;

diff --git a/...sitory/GsApplicationTools-Test.package/GemServerRemoteVMTests.class/methodProperties.json b/...sitory/GsApplicationTools-Test.package/GemServerRemoteVMTests.class/methodProperties.json
@@ -8,8 +8,8 @@
 	"instance" : {
 		"createGemServer" : "dkh 01/09/2015 14:05",
 		"interactiveRemoteServer" : "dkh 01/09/2015 14:02",
-		"startGems:" : "dkh 05/28/2015 01:08",
+		"startGems:" : "dkh 05/28/2015 01:26",
 		"staticRemoteServer" : "dkh 01/09/2015 14:03",
 		"stopGems:" : "dkh 05/28/2015 01:05",
 		"testForceBeginTransaction" : "dkh 01/09/2015 14:08",
-		"waitForStartGems:" : "dkh 05/28/2015 01:09" } }
+		"waitForGemServer:message:" : "dkh 05/28/2015 01:25" } }