diff options
Diffstat (limited to 'mail/majordomo/patches/patch-ai')
| -rw-r--r-- | mail/majordomo/patches/patch-ai | 15 |
1 files changed, 13 insertions, 2 deletions
diff --git a/mail/majordomo/patches/patch-ai b/mail/majordomo/patches/patch-ai index 270e1f9ec11..2827a9c8267 100644 --- a/mail/majordomo/patches/patch-ai +++ b/mail/majordomo/patches/patch-ai @@ -1,8 +1,19 @@ -$NetBSD: patch-ai,v 1.3 2011/01/29 17:16:33 spz Exp $ +$NetBSD: patch-ai,v 1.4 2011/08/27 15:47:43 schnoebe Exp $ + +Quite messages from perl 5.14.1, this is very old code. --- resend.orig 2000-01-07 15:32:39.000000000 +0000 +++ resend -@@ -78,8 +78,8 @@ if (! defined($opt_l)) { +@@ -71,15 +71,15 @@ if ($ARGV[0] =~ /^\@/) { + # getopts.pl was place where it's supposed to be. This changes previous + # behavior which allowed getopts.pl to be in the same place as + # majordomo.cf. +-require "getopts.pl"; +-&Getopts("C:c:Aa:df:h:I:l:M:p:Rr:s") || die("resend: Getopts() failed: $!"); ++use Getopt::Std; ++getopts("C:c:Aa:df:h:I:l:M:p:Rr:s") || die("resend: Getopts() failed: $!"); + + if (! defined($opt_l)) { die("resend: must specify '-l list'"); } |