--- SMTP.pm.old Wed Mar 26 10:22:37 2003
+++ SMTP.pm Wed Mar 26 10:23:03 2003
@@ -296,6 +296,7 @@
my $timeout = $self->config('timeout');
+ alarm $timeout;
while (<STDIN>) {
$complete++, last if $_ eq ".\r\n";
$i++;
-- RISKÓ Gergely
