Minor fix for qualified name of virtual nodes.

cb57bc7d · Leigh B. Stoller · 8e6c0141 · cb57bc7d
Commit cb57bc7d authored Dec 31, 2002 by Leigh B. Stoller
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

tbsetup/tbreport.in tbsetup/tbreport.in +2 -2

No files found.
--- a/tbsetup/tbreport.in
+++ b/tbsetup/tbreport.in
@@ -170,13 +170,13 @@ if ($shownodes) {

    while (($vname,$ips,$osname,$cmd_line,$rpms,$deltas,$startupcmd,
 	    $tarfiles,$type,$fixed) = $virtnodes_result->fetchrow_array()) {
+	my $qualname = "$vname.$eid.$pid.$DOMAIN";

 	if ($fixed) {
 	    $vname = "$vname ($fixed)";
 	}

-	printf "%-15s %-12s %-15s %s\n", $vname, $type, $osname,
-	       "$vname.$eid.$pid.$DOMAIN";
+	printf "%-15s %-12s %-15s %s\n", $vname, $type, $osname, $qualname;
 	if ($cmd_line ne "") {
 	    printf "   %-17s %s\n", "Command Line:", $cmd_line;
 	}