*** scripts/webstump.lib.pl	2005-07-17 12:00:45.000000000 -0400
--- ../../webstump/scripts/webstump.lib.pl	1999-07-02 15:07:56.000000000 -0400
***************
*** 7,29 ****
    if( defined $html_mode ) {
      print 
  "Content-Type: text/html\n\n
! <html>
! <head>
! <title>WebSTUMP Error</title>
! </head>
! <body>
! <h1>You have encountered an error in WebSTUMP.</h1>";
  
    &print_image( "construction.gif", "bug in WebSTUMP" );
  
!   print " <h4>$msg</h4><hr />
! <p>Please cut and paste this
! whole page and send it to <a href=\"mailto:$supporter\">$supporter</a>.</p>
! <p>Query Parameters:</p>\n
! <ul>";
  
      foreach (keys %request) {
!       print "<li> $_: $request{$_}</li>\n";
      }
      exit 0;
    }
--- 7,26 ----
    if( defined $html_mode ) {
      print 
  "Content-Type: text/html\n\n
! <TITLE>WebSTUMP Error</TITLE>
! <BODY BGCOLOR=\"#C5C5FF\" BACKGROUND=$base_address_for_files/images/bg1.jpg>
! <H1>You have encountered an error in WebSTUMP.</H1>";
  
    &print_image( "construction.gif", "bug in WebSTUMP" );
  
!   print " <B>$msg </B><HR>
! Please cut and paste this
! whole page and send it to <A HREF=mailto:$supporter>$supporter</A>.<P>
! Query Parameters:<P>\n
! <UL>";
  
      foreach (keys %request) {
!       print "<LI> $_: $request{$_}\n";
      }
      exit 0;
    }
***************
*** 38,44 ****
      print 
  "Content-Type: text/html\n\n
  <TITLE>You have made a mistake.</TITLE>
! <BODY>
  <H1>You have made a mistake.</H1>
    ";
  
--- 35,41 ----
      print 
  "Content-Type: text/html\n\n
  <TITLE>You have made a mistake.</TITLE>
! <BODY BGCOLOR=\"#C5C5FF\" BACKGROUND=$base_address_for_files/images/bg1.jpg>
  <H1>You have made a mistake.</H1>
    ";
  
