diff options
author | pat <pat@FreeBSD.org> | 2002-03-12 06:05:59 +0800 |
---|---|---|
committer | pat <pat@FreeBSD.org> | 2002-03-12 06:05:59 +0800 |
commit | 761651e3e4c60ab797b81b8a687e4e1df57817f4 (patch) | |
tree | b3c5971516f0b802c297ebd7c61d28b31f9c20ac /mail/p5-IMAP-Admin | |
parent | 0886c96e7e7668e829ef0d686278e241f3704791 (diff) | |
download | freebsd-ports-gnome-761651e3e4c60ab797b81b8a687e4e1df57817f4.tar.gz freebsd-ports-gnome-761651e3e4c60ab797b81b8a687e4e1df57817f4.tar.zst freebsd-ports-gnome-761651e3e4c60ab797b81b8a687e4e1df57817f4.zip |
Update to 1.6.1
PR: 35771
Submitted by: maintainer
Diffstat (limited to 'mail/p5-IMAP-Admin')
-rw-r--r-- | mail/p5-IMAP-Admin/Makefile | 2 | ||||
-rw-r--r-- | mail/p5-IMAP-Admin/distinfo | 2 | ||||
-rw-r--r-- | mail/p5-IMAP-Admin/files/patch-aa | 22 |
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/) { |