From e1a2b86f4a71a55289dcd77e64809abb444b372f Mon Sep 17 00:00:00 2001
From: "slamm%netscape.com" <slamm%netscape.com>
Date: Thu, 18 Mar 1999 02:53:54 +0000
Subject: [PATCH] Older version of perl cannot have foreach loop on same line
 as print.

---
 webtools/tinderbox/showlog.cgi | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/webtools/tinderbox/showlog.cgi b/webtools/tinderbox/showlog.cgi
index 481905b943ea..67d52db612d8 100755
--- a/webtools/tinderbox/showlog.cgi
+++ b/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>