diff options
author | des <des@FreeBSD.org> | 2004-01-24 15:06:36 +0000 |
---|---|---|
committer | des <des@FreeBSD.org> | 2004-01-24 15:06:36 +0000 |
commit | 1f8956fc770d4d8201c66e4d90f5acbae225d4d6 (patch) | |
tree | 6045ee23b5296e878e3541cb95a518cd85215d2f | |
parent | 70865363ca3965520f879ab49c6846b9d34015c6 (diff) | |
download | FreeBSD-src-1f8956fc770d4d8201c66e4d90f5acbae225d4d6.zip FreeBSD-src-1f8956fc770d4d8201c66e4d90f5acbae225d4d6.tar.gz |
Include the hostname in the history file.
-rw-r--r-- | tools/tools/tinderbox/tbmaster.pl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/tools/tools/tinderbox/tbmaster.pl b/tools/tools/tinderbox/tbmaster.pl index cd7e10b..c96b483 100644 --- a/tools/tools/tinderbox/tbmaster.pl +++ b/tools/tools/tinderbox/tbmaster.pl @@ -130,13 +130,14 @@ sub history($$$) { my $end = shift; my $success = shift; - my $history = strftime("%Y-%m-%d %H:%M:%S\t", localtime($start)); + my $history = expand('HOSTNAME') . "\t"; + $history .= strftime("%Y-%m-%d %H:%M:%S\t", localtime($start)); $history .= strftime("%Y-%m-%d %H:%M:%S\t", localtime($end)); $history .= expand('ARCH') . "\t"; $history .= expand('MACHINE') . "\t"; my $date = expand('DATE'); if ($date) { - $date =~ s/\s+/\t/g; + $date =~ s/\s+/ /g; $history .= expand('BRANCH') . ":" . expand('DATE') . "\t"; } else { $history .= expand('BRANCH') . "\t"; |