![[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.7, 2000/09/23 20:23:34 | version 3.26, 2000/09/22 11:13:17 | ||
|---|---|---|---|
|
|
||
| # SUCH DAMAGE. | # SUCH DAMAGE. | ||
| # | # | ||
| # $zId: cvsweb.cgi,v 1.103 2000/09/20 17:02:29 jumager Exp $ | # $zId: cvsweb.cgi,v 1.103 2000/09/20 17:02:29 jumager Exp $ | ||
| # $kId: cvsweb.cgi,v 1.26 2000/09/22 11:13:17 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.103 $ $kRevision: 1.26 $ -->'; | print '<!-- CVSweb $zRevision: 1.103 $ $Revision$ -->'; | ||
| print "\n<TITLE>$path$filename - $title - $rev</TITLE></HEAD>\n"; | print "\n<TITLE>$path$filename - $title - $rev</TITLE></HEAD>\n"; | ||
| print "$body_tag_for_src\n"; | print "$body_tag_for_src\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.103 $ $kRevision: 1.26 $'; #' | my $version = '$zRevision: 1.103 $ $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" |