From 6bae52d41b22d0f7ec9919e409cacb328aa353ce Mon Sep 17 00:00:00 2001
From: "slamm%netscape.com"
 <slamm%netscape.com@18797224-902f-48f8-a5cc-f745e15eee43>
Date: Thu, 18 Mar 1999 02:53:54 +0000
Subject: [PATCH] Older version of perl cannot have foreach loop on same line
 as print.

git-svn-id: svn://10.0.0.236/trunk@24289 18797224-902f-48f8-a5cc-f745e15eee43
---
 mozilla/webtools/tinderbox/showlog.cgi | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/mozilla/webtools/tinderbox/showlog.cgi b/mozilla/webtools/tinderbox/showlog.cgi
index 481905b943e..67d52db612d 100755
--- a/mozilla/webtools/tinderbox/showlog.cgi
+++ b/mozilla/webtools/tinderbox/showlog.cgi
@@ -161,11 +161,15 @@ print "
 <p> Click error to take you to the error in the log.
 <PRE>
 ";
-print foreach (@summary_output);
+foreach (@summary_output) {
+  print;
+}
 print "</PRE>\n";
 
 print "<H2>Build Error Log</H2>\n<pre>";
-print foreach (@log_output);
+foreach (@log_output) {
+  print;
+}
 print
 "</PRE>