hamradio/spider
1
0
Fork 0
mirror of git://scm.dxcluster.org/scm/spider synced 2024-09-22 00:07:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

fxied infinite loop

Browse Source
This commit is contained in:
djk 1999-10-31 21:59:59 +00:00
parent b9442c2b06
commit ce2e3045ba
2 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
perl/client.pl
View File

@ -270,6 +270,10 @@ sub dochat
$line = <$rfh>;
$line =~ s/\r//og;
}
if (length $line == 0) {
dbg('connect', "received 0 length line, aborting...");
cease(11);
}
dbg('connect', "received \"$line\"");
if ($abort && $line =~ /$abort/i) {
dbg('connect', "aborted on /$abort/");

2
perl/console.pl
View File

@ -137,7 +137,7 @@ sub measure
# display the top screen
sub show_screen
{
if ($spos == @shistory - 1) {
if ($spos >= @shistory - 1) {
# if we really are scrolling thru at the end of the history
my $line = $shistory[$spos];