Changeset 838fb6a for fedkit

Timestamp:

Sep 17, 2007 3:05:02 PM (17 years ago)

Author:

Ted Faber <faber@…>

Branches:

axis_example, compt_changes, info-ops, master, version-1.30, version-2.00, version-3.01, version-3.02

Children:

3529a90

Parents:

f70f9c8

Message:

getting hostnames from the current directory - should be from tmpdir

File:

• fedkit/splitter.pl (modified) (3 diffs)

fedkit/splitter.pl

@@ -153 +153 @@
     if ($state eq "active") {
         # First copy new scripts and hostinfo into the remote /proj
-        &scp_file("$tmpdir/$tb/hostnames", "$user\@$host", $to_hostname) ||
+        &scp_file("$tmpdir/hostnames", "$user\@$host", $to_hostname) ||
             return 0;
         &ship_scripts($host, $user, $proj_dir) || return 0;
@@ -166 +166 @@
         # First copy new scripts and hostinfo into the remote /proj (because
         # the experiment exists, the directory tree should be there.
-        &scp_file("./hostnames", "$user\@$host", $to_hostname) || return 0;
+        &scp_file("$tmpdir/hostnames", "$user\@$host", $to_hostname) ||
+            return 0;
         &ship_scripts($host, $user, $proj_dir) || return 0;
         &ship_configs($host, $user, "$tmpdir/$tb", $proj_dir) || return 0;
@@ -183 +184 @@
             "$pid -e $eid $tclfile", "startexp") || return 0;
         # First copy new scripts and hostinfo into the remote /proj
-        &scp_file("./hostnames", "$user\@$host", $to_hostname) || return 0;
+        &scp_file("$tmpdir/hostnames", "$user\@$host", $to_hostname) ||
+            return 0;
         &ship_scripts($host, $user, $proj_dir) || return 0;
         &ship_configs($host, $user, "$tmpdir/$tb", $proj_dir) || return 0;