diff options
Diffstat (limited to 'vb/demo/IceGrid/sessionActivation/Server.vb')
-rwxr-xr-x | vb/demo/IceGrid/sessionActivation/Server.vb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/vb/demo/IceGrid/sessionActivation/Server.vb b/vb/demo/IceGrid/sessionActivation/Server.vb index d023cbeb2db..12645b4a46e 100755 --- a/vb/demo/IceGrid/sessionActivation/Server.vb +++ b/vb/demo/IceGrid/sessionActivation/Server.vb @@ -14,8 +14,8 @@ Module SessionActivationS Public Overloads Overrides Function run(ByVal args() As String) As Integer Dim adapter As Ice.ObjectAdapter = communicator().createObjectAdapter("Hello") - Dim properties As Ice.Properties = communicator().getProperties() - Dim id As Ice.Identity = communicator().stringToIdentity(properties.getProperty("Identity")) + Dim properties As Ice.Properties = communicator().getProperties() + Dim id As Ice.Identity = communicator().stringToIdentity(properties.getProperty("Identity")) adapter.add(New HelloI(properties.getProperty("Ice.ServerId")), id) adapter.activate() communicator.waitForShutdown() |