Changeset 770

Timestamp:

Jun 13, 2007 9:15:38 AM (17 years ago)

Author:

nkissebe

Message:

rename resource variable to look for to molvis_server instead of hubvis_server

Location:

trunk/gui/scripts

Files:

• deviceEditor.tcl (modified) (3 diffs)
• molvisviewer.tcl (modified) (1 diff)

trunk/gui/scripts/deviceEditor.tcl

@@ -37 +37 @@
     private variable _current ""  ;# active device editor
 
-    public common _hubvisHosts ""
-
-    public proc setHubvisServer {namelist} {
+    public common _molvisHosts ""
+
+    public proc setMolvisServer {namelist} {
         if {[regexp {^[a-zA-Z0-9\.]+:[0-9]+(,[a-zA-Z0-9\.]+:[0-9]+)*$} $namelist match]} {
-            set _hubvisHosts $namelist
+            set _molvisHosts $namelist
         } else {
             error "bad visualization server address \"$namelist\": should be host:port,host:port,..."
@@ -54 +54 @@
 proc deviceEditor_init_resources {} {
     Rappture::resources::register \
-        hubvis_server Rappture::DeviceEditor::setHubvisServer
+        molvis_server Rappture::DeviceEditor::setMolvisServer
 }
 
@@ -185 +185 @@
             if {![winfo exists $itk_component(hull).mol]} {
                 catch {destroy $itk_component(hull).dev}
-                if {"" != $_hubvisHosts} {
-                    Rappture::MolvisViewer $itk_component(hull).mol $_hubvisHosts
+                if {"" != $_molvisHosts} {
+                    Rappture::MolvisViewer $itk_component(hull).mol $_molvisHosts
                 } else {
                     Rappture::MoleculeViewer $itk_component(hull).mol $this

trunk/gui/scripts/molvisviewer.tcl

@@ -346 +346 @@
 
     #
-    # Connect to the hubvis server.  
+    # Connect to the molvis server.  
     # If it's too busy, that server may
     # forward us to another.