#! /usr/bin/perl
# -*- Perl -*-

$_ = <>; #Kernel Change Summary
$_ = <>; #Linux 1.3.74 (5080 lines)
if (/^Linux (\d+).(\d+).(\d+)/) {
    $version = $3;
}
$date = <>; #date
$_ = <>; #<mec@duracef.shout.net>

$_ = <>;
$_ = <>;
$_ = <>;

$prev_ver = $version - 1;
$next_ver = $version + 1;

print qq*<!--#exec cmd="header -n 'Kernel Change Summary 1.3.$prev_ver -> 1.3.$version'" -->
<h1>Changes from 1.3.$prev_ver to 1.3.$version</h1>
<h5> These changes are archived on <a
href="ftp://ftp.crynwr.com:pub/kchanges">ftp.crynwr.com:pub/kchanges</a>
and <a
href="http://www.crynwr.com/kchanges">http://www.crynwr.com/kchanges</a>.
I cannot answer questions about Linux -- I merely summarize the kernel
patches after reading them.  I try to make them useful to everyone,
but kernel hackers should take them with a grain of salt and read the
patches themselves.  The patch file is <a
href="http://sunsite.unc.edu/pub/Linux/kernel/v1.3/patch-1.3.$version.gz">patch-1.3.$version.gz</a>
</h5><H2>These are from mec@treflan.shout.net (Michael Chastain)
[he might not want to answer questions about Linux either :) -russ]</H2>

<UL>
*;
while(<>) {
    s,\&,\&\#38\;,g;
    s,\<,\&\#60\;,g;
    s,\>,\&\#62\;,g;
    if (/^\w/) {
	print "<li>$_";
    } else {
	print;
    }
    last if /^$/;
}
split(" ", $date);
$date = "$_[1] $_[2] $_[3]";
print qq*</UL>

<h3>[<a href="index.html">Index</a>][<a href="changes1.3.$next_ver.html">Next</a>]</h3>
<!-- Date: $date -->
<!--#exec cmd="trailer -n"-->
*;