keitairc 1.25

diff --git a/ChangeLog b/ChangeLog
index 2bee364..7dc6afb 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,6 +1,7 @@
 2004-08-29  Jun Morimoto  <morimoto@xantia.citroen.org>
 
-       * recent (\e$BA4%A%c%M%k$NL$FI$r$^$H$aFI$_\e(B) \e$BDI2C\e(B
+       * keitairc 1.25: added <hr>
+       * kaitairc 1.24: recent (\e$BA4%A%c%M%k$NL$FI$r$^$H$aFI$_\e(B) \e$BDI2C\e(B
        * \e$B$A$g$C$H%3!<%I$rA]=|\e(B
 
 2004-08-18  Jun Morimoto  <morimoto@xantia.citroen.org>

diff --git a/doc/index.html b/doc/index.html
index 4a28ee1..4521dc1 100644 (file)
--- a/doc/index.html
+++ b/doc/index.html
@@ -10,7 +10,7 @@
 
 <p class="flushleft">
 morimoto@xantia.citroen.org<br>
-$Id: index.html,v 1.18 2004-08-29 11:21:02 morimoto Exp $
+$Id: index.html,v 1.19 2004-08-29 12:24:21 morimoto Exp $
 </p>
 
 <h2>ÀâÌÀ</h2>
@@ -180,7 +180,7 @@ OK 
 <h2>Changes</h2>
 <dl>
 
-<dt>1.24
+<dt>1.25
 <dd>Á´¥Á¥ã¥Í¥ë¤Î̤ÆɤޤȤáÆɤßÄɲÃ
 
 <dt>1.23

diff --git a/keitairc b/keitairc
index aa925f0..7eebe8f 100755 (executable)
--- a/keitairc
+++ b/keitairc
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 # keitairc
-# $Id: keitairc,v 1.24 2004-08-29 11:21:02 morimoto Exp $
+# $Id: keitairc,v 1.25 2004-08-29 12:24:21 morimoto Exp $
 #
 # Copyright (c) 2003 Jun Morimoto <morimoto@xantia.citroen.org>
 # This program is covered by the GNU General Public License 2
@@ -8,7 +8,7 @@
 # Depends: libjcode-pm-perl, libpoe-component-irc-perl,
 #   liburi-perl, libwww-perl, libappconfig-perl
 
-my $rcsid = q$Id: keitairc,v 1.24 2004-08-29 11:21:02 morimoto Exp $;
+my $rcsid = q$Id: keitairc,v 1.25 2004-08-29 12:24:21 morimoto Exp $;
 my ($version) = $rcsid =~ m#,v ([0-9.]+)#;
 
 use strict;
@@ -409,6 +409,7 @@ sub on_web_request{
            $content .= &render($channel_recent{$canon_channel});
            $unread_lines{$canon_channel} = 0;
            $channel_recent{$canon_channel} = '';
+           $content .= '<hr>';
          }
        }
         $content .= qq(<a accesskey="8" href="$docroot">ch list[8]</a>);