- Update to 0.09

This commit is contained in:
Pav Lucistnik 2005-01-24 19:32:10 +00:00
parent 1e3ac548e4
commit a143afa93e
Notes: svn2git 2021-03-31 03:12:20 +00:00
svn path=/head/; revision=127211
3 changed files with 11 additions and 12 deletions

View file

@ -6,7 +6,7 @@
# #
PORTNAME= Net-Server-Mail PORTNAME= Net-Server-Mail
PORTVERSION= 0.08 PORTVERSION= 0.09
CATEGORIES= mail perl5 CATEGORIES= mail perl5
MASTER_SITES= ftp://ftp.rhapsodyk.net/pub/devel/perl/Net-Server-Mail/ MASTER_SITES= ftp://ftp.rhapsodyk.net/pub/devel/perl/Net-Server-Mail/
PKGNAMEPREFIX= p5- PKGNAMEPREFIX= p5-

View file

@ -1,2 +1,2 @@
MD5 (Net-Server-Mail-0.08.tar.gz) = 6ebc3d9ee6739443dae8dbd960bfcd6e MD5 (Net-Server-Mail-0.09.tar.gz) = 336c8359d6687a6f8445f660288ba3da
SIZE (Net-Server-Mail-0.08.tar.gz) = 13676 SIZE (Net-Server-Mail-0.09.tar.gz) = 13580

View file

@ -68,9 +68,8 @@ diff -ru lib.old/Net/Server/Mail/SMTP.pm lib/Net/Server/Mail/SMTP.pm
=pod =pod
diff -ru lib.old/Net/Server/Mail.pm lib/Net/Server/Mail.pm --- lib/Net/Server/Mail.pm.orig Wed Jan 5 19:50:35 2005
--- lib.old/Net/Server/Mail.pm Sun Apr 6 17:18:17 2003 +++ lib/Net/Server/Mail.pm Mon Jan 24 20:22:04 2005
+++ lib/Net/Server/Mail.pm Thu Feb 19 15:50:38 2004
@@ -1,6 +1,5 @@ @@ -1,6 +1,5 @@
package Net::Server::Mail; package Net::Server::Mail;
@ -78,16 +77,16 @@ diff -ru lib.old/Net/Server/Mail.pm lib/Net/Server/Mail.pm
use strict; use strict;
use Sys::Hostname; use Sys::Hostname;
use IO::Select; use IO::Select;
@@ -500,7 +499,7 @@ @@ -502,7 +501,7 @@
else else
{ {
next unless defined; next unless defined;
- my $rv = $self->{process_operation}($self, $_); - $rv = $self->{process_operation}($self, $_);
+ my $rv = $self->{process_operation}->($self, $_); + $rv = $self->{process_operation}->($self, $_);
}
# if $rv is defined, we have to close the connection # if $rv is defined, we have to close the connection
return $rv if defined $rv; return $rv if defined $rv;
} @@ -521,7 +520,7 @@
@@ -518,7 +517,7 @@
} }
else else
{ {