aboutsummaryrefslogtreecommitdiff
path: root/mail/p5-IMAP-Admin
diff options
context:
space:
mode:
authorPatrick Li <pat@FreeBSD.org>2002-03-11 22:05:59 +0000
committerPatrick Li <pat@FreeBSD.org>2002-03-11 22:05:59 +0000
commit235d17259960d194618e1d26f5f21e19c447f498 (patch)
treeb8e8f83f42cda78c27bb806e92b7dd4772b607f9 /mail/p5-IMAP-Admin
parent7fd4ed84a5a46c7b8efd004ad106f6b64ce99e58 (diff)
downloadports-235d17259960d194618e1d26f5f21e19c447f498.tar.gz
ports-235d17259960d194618e1d26f5f21e19c447f498.zip
Notes
Diffstat (limited to 'mail/p5-IMAP-Admin')
-rw-r--r--mail/p5-IMAP-Admin/Makefile2
-rw-r--r--mail/p5-IMAP-Admin/distinfo2
-rw-r--r--mail/p5-IMAP-Admin/files/patch-aa22
3 files changed, 2 insertions, 24 deletions
diff --git a/mail/p5-IMAP-Admin/Makefile b/mail/p5-IMAP-Admin/Makefile
index 081ba752d805..e162e3f50beb 100644
--- a/mail/p5-IMAP-Admin/Makefile
+++ b/mail/p5-IMAP-Admin/Makefile
@@ -6,7 +6,7 @@
#
PORTNAME= IMAP-Admin
-PORTVERSION= 1.6.0
+PORTVERSION= 1.6.1
CATEGORIES= mail perl5
MASTER_SITES= ${MASTER_SITE_PERL_CPAN}
MASTER_SITE_SUBDIR= IMAP
diff --git a/mail/p5-IMAP-Admin/distinfo b/mail/p5-IMAP-Admin/distinfo
index d343d4689372..5a5aaa3bc4d1 100644
--- a/mail/p5-IMAP-Admin/distinfo
+++ b/mail/p5-IMAP-Admin/distinfo
@@ -1 +1 @@
-MD5 (IMAP-Admin-1.6.0.tar.gz) = 7927389fb6129e9ae05254011c8fc4b6
+MD5 (IMAP-Admin-1.6.1.tar.gz) = 8215f41efca2d96b5e2902b8e413a751
diff --git a/mail/p5-IMAP-Admin/files/patch-aa b/mail/p5-IMAP-Admin/files/patch-aa
deleted file mode 100644
index ceaa63828fdd..000000000000
--- a/mail/p5-IMAP-Admin/files/patch-aa
+++ /dev/null
@@ -1,22 +0,0 @@
---- Admin.pm.orig Wed Nov 29 07:06:44 2000
-+++ Admin.pm Tue Aug 14 16:17:12 2001
-@@ -6,7 +6,7 @@
- use Carp;
- use IO::Select;
- use IO::Socket;
--use IO::Socket::INET;
-+#use IO::Socket::INET;
- use Text::ParseWords qw(parse_line);
- use Cwd;
-
-@@ -463,7 +463,9 @@
- print $fh qq{try GETACL "$mailbox"\n};
- delete $self->{'acl'};
- my $try = $self->_read;
-- while ($try =~ /^\* ACL\s+(?:\".*?\"|.*?)\s+((\".*?\"|.*?)(?:\s)(?{ push @{$self->{'acl'}}, $2; }))+(\w+)(?{ push @{$self->{'acl'}}, $3; })$/) {
-+ while ($try =~ /^\* ACL\s+(?:\".*?\"|.*?)\s+((\".*?\"|.*?)(?:\s))+(\w+)$/) {
-+ push (@{$self->{'acl'}}, $2);
-+ push (@{$self->{'acl'}}, $3);
- $try = $self->_read;
- }
- if ($try =~ /^try OK/) {