Re-commit the 'nocrap'. This time it's not crappy.

webtools/tinderbox/showbuilds.cgi

@@ -105,9 +105,6 @@ sub show_tree_selector {
 
 sub display_page_head {
 
-    my ($imageurl,$imagewidth,$imageheight,$quote) = &get_image;
-
-
 # srand;
 # $when = 60*10 + int rand(60*40);
 # <META HTTP-EQUIV=\"REFRESH\" CONTENT=\"$when\">
@@ -129,29 +126,33 @@ $treename = $tree . ($tree2 ne "" ? " and $tree2" : "" );
     print "$script_str\n";
     print "$message_of_day\n";
 
-    print "<table width='100%'>";
-    print "<tr>";
-    print "<td valign=bottom>";
-    print "<p><center><a href=addimage.cgi><img src='$imageurl' ";
-    print "width=$imagewidth height=$imageheight><br>";
-    print "$quote</a><br>";
-    print "</center>";
-    print "<p>";
-    print "<td align=right valign=bottom>";
-    print "<table><tr><td>";
-    print "<TT>L</TT> = Show Build Log<br>";
-    print "<TT><img src=star.gif>L</TT> = Show Log comments<br>";
-    print "<TT>C</TT> = Show changes that occured since the last build<br>";
-    print "<TT>B</TT> = Download binary generated by the build<br>";
-    print "<table cellspacing=2 border>";
-    print "<tr bgcolor=00ff00><td>Built successfully";
-    print "<tr bgcolor=yellow><td>Currently Building";
-    print "<tr bgcolor=orange><td>Build Successful, Build Tests Failed";
-    print "<tr bgcolor=red><td>Build failed";
-    print "</table>";
-    print "</td></tr></table>";
-    print "</table>";
-
+    if (!$form{'nocrap'}) {
+        my ($imageurl,$imagewidth,$imageheight,$quote) = &get_image;
+        print qq{
+            <table width="100%">
+            <tr>
+            <td valign=bottom>
+            <p><center><a href=addimage.cgi><img src="$imageurl"
+            width=$imagewidth height=$imageheight><br>
+            $quote</a><br>
+            </center>
+            <p>
+            <td align=right valign=bottom>
+            <table><tr><td>
+            <TT>L</TT> = Show Build Log<br>
+            <TT><img src="star.gif">L</TT> = Show Log comments<br>
+            <TT>C</TT> = Show changes that occured since the last build<br>
+            <TT>B</TT> = Download binary generated by the build<br>
+            <table cellspacing=2 border>
+            <tr bgcolor="00ff00"><td>Built successfully
+            <tr bgcolor="yellow"><td>Currently Building
+            <tr bgcolor="orange"><td>Build Successful, Build Tests Failed
+            <tr bgcolor="red"><td>Build failed
+            </table>
+            </td></tr></table>
+            </table>
+            };
+      }
     if($bonsai_tree){
         print "<p>The tree is currently <font size=+2>";
         if( &tree_open ){