Changeset 4090

Timestamp:

2003-04-07T14:48:15+12:00 (21 years ago)

Author:

dana

Message:

mac compliance

Location:

trunk/gsdl/cgi-bin

Files:

• readresults.cgi (modified) (2 diffs)
• usabcgi.pm (modified) (1 diff)

trunk/gsdl/cgi-bin/readresults.cgi

@@ -37 +37 @@
 if(!($etcfile=~ /$ENV{QUERY_STRING}/)) {
     print "<h2>Each report sent has an ID number.  This program needs one of those ID numbers to work, and the ID number provided wans't found</h2></body></html>";  
-    die;$ENV{HTTP_USER_AGENT}=~/([^\/]*)\/([0-9]+\.[0-9]+)/;
-if(($1 ne "Netscape")||($2 > 4.77)){
-    print "<style type=\"text/css\">\n";
-    print "\th1 \{font-family: sans-serif; font-size: 20px}\n";
-    print "\th2 \{font-family: sans-serif; font-size: 14px; color: #009966\}\n";     
-    print "\ttd.sans {font-family:sans-serif; width: 50%; vertical-align:top}\n";   
-    print "</style>\n"
-}
+    die;
 }
 
@@ -112 +105 @@
 sub make_table_entry {
     local ($desc, $entry) = @_;
-    print "<tr><td class=\"sans\" width=\"50%\"><b>$desc:</b></td>";
+    print "<tr><td class=\"sans\" width="50%"><b>$desc:</b></td>";
     print "<td>$reportvals{$entry}</td></tr>\n";
     delete $reportvals{$entry};

trunk/gsdl/cgi-bin/usabcgi.pm

@@ -42 +42 @@
     print "\th2 {font-family: sans-serif; font-size: 14px; font-weight: bold; color: #009966}\n";
     print "\tp.sans {font-family: sans-serif}\n";
-    print "\ttd.sans {font-family: sans-serif; vertical-align:top}\n";
+    print "\ttd.sans {font-family: sans-serif; width: 50%; vertical-align:top}\n";
     print "</style>\n";
     }