[LON-CAPA-cvs] cvs: loncom / lonManage

[foxr]

foxr		Mon Nov  3 05:48:18 2003 EDT

  Modified files:              
    /loncom	lonManage 
  Log:
  Add code to create initial connection to lond.  Tests out ok.
  
  
Index: loncom/lonManage
diff -u loncom/lonManage:1.21 loncom/lonManage:1.22
--- loncom/lonManage:1.21	Mon Nov  3 05:39:24 2003
+++ loncom/lonManage	Mon Nov  3 05:48:18 2003
@@ -3,9 +3,9 @@
 #
 #  lonManage supports remote management of nodes in a LonCAPA cluster.
 #
-#  $Id: lonManage,v 1.21 2003/11/03 10:39:24 foxr Exp $
+#  $Id: lonManage,v 1.22 2003/11/03 10:48:18 foxr Exp $
 #
-# $Id: lonManage,v 1.21 2003/11/03 10:39:24 foxr Exp $
+# $Id: lonManage,v 1.22 2003/11/03 10:48:18 foxr Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -114,7 +114,9 @@
 
 sub MakeLondConnection {
     my $host = shift;
-    return "junk";
+
+    my $Connection = LondConnection->new($host, $ServerPort);
+    return return $Connection;
 }
 
 sub NegotiateStartup {