Fixed some output issues where newlines were not being printed after error messages

git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@29082 91177308-0d34-0410-b5e6-96231b3b80d8

1 files changed, 4 insertions, 3 deletions

diff --git a/utils/NewNightlyTest.pl b/utils/NewNightlyTest.pl
index 67af967974..402cc3b7d5 100755
--- a/utils/NewNightlyTest.pl
+++ b/utils/NewNightlyTest.pl
@@ -281,7 +281,7 @@ sub ReadFile {
 	$/ = '\n';
 	return $Ret;
     } else {
-	print "Could not open file '$_[0]' for reading!";
+	print "Could not open file '$_[0]' for reading!\n";
 	return "";
     }
 }
@@ -289,7 +289,7 @@ sub ReadFile {
 #~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 #~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 sub WriteFile {  # (filename, contents)
-    open (FILE, ">$_[0]") or die "Could not open file '$_[0]' for writing!";
+    open (FILE, ">$_[0]") or die "Could not open file '$_[0]' for writing!\n";
     print FILE $_[1];
     close FILE;
 }
@@ -429,7 +429,8 @@ sub SendData{
 
     my $sentdata="";
     foreach $x (keys (%$variables)){
-        $sentdata.= "$x  => $hash_of_data{$x}\n";
+        $value = $variables->{$x};
+        $sentdata.= "$x  => $value\n";
     }
     WriteFile "$Prefix-sentdata.txt", $sentdata;