![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to cvsweb.cgi CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [cvsweb.bsd.lv] / cvsweb|
Return to cvsweb.cgi CVS log | Up to [cvsweb.bsd.lv] / cvsweb |
| version 1.1.1.4, 2000/09/03 18:41:30 | version 3.17, 2000/09/03 18:25:47 | ||
|---|---|---|---|
|
|
||
| # SUCH DAMAGE. | # SUCH DAMAGE. | ||
| # | # | ||
| # $zId: cvsweb.cgi,v 1.94 2000/08/24 06:41:22 hnordstrom Exp $ | # $zId: cvsweb.cgi,v 1.94 2000/08/24 06:41:22 hnordstrom Exp $ | ||
| # $kId: cvsweb.cgi,v 1.17 2000/09/03 18:25:47 knu Exp $ | # $Id$ | ||
| # | # | ||
| ### | ### | ||
|
|
||
| $swhere = urlencode($filename) if ($swhere eq ""); | $swhere = urlencode($filename) if ($swhere eq ""); | ||
| print "<\!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Transitional//EN\">"; | print "<\!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Transitional//EN\">"; | ||
| print "<HTML>\n<HEAD>\n"; | print "<HTML>\n<HEAD>\n"; | ||
| print '<!-- CVSweb $zRevision: 1.94 $ $kRevision: 1.17 $ -->'; | print '<!-- CVSweb $zRevision: 1.94 $ $Revision$ -->'; | ||
| print "\n<TITLE>$path$filename - $title - $rev</TITLE></HEAD>\n"; | print "\n<TITLE>$path$filename - $title - $rev</TITLE></HEAD>\n"; | ||
| print "<BODY BGCOLOR=\"$backcolor\">\n"; | print "<BODY BGCOLOR=\"$backcolor\">\n"; | ||
| print "<table width=\"100%\" border=0 cellspacing=0 cellpadding=1 bgcolor=\"$navigationHeaderColor\">"; | print "<table width=\"100%\" border=0 cellspacing=0 cellpadding=1 bgcolor=\"$navigationHeaderColor\">"; | ||
|
|
||
| sub html_header($) { | sub html_header($) { | ||
| my ($title) = @_; | my ($title) = @_; | ||
| my $version = '$zRevision: 1.94 $ $kRevision: 1.17 $'; #' | my $version = '$zRevision: 1.94 $ $Revision$'; #' | ||
| http_header(); | http_header(); | ||
| print <<EOH; | print <<EOH; | ||
| <!doctype html public "-//W3C//DTD HTML 4.0 Transitional//EN" | <!doctype html public "-//W3C//DTD HTML 4.0 Transitional//EN" |