ports/mail/majordomo/files/patch-approve
Andrej Zverev c855aaa590 - Add patches to allow run under perl 5.16
PR:		ports/183863
Submitted by:	wolfgang@lyxys.ka.sub.org
With hat:	perl@
2013-11-24 15:03:51 +00:00

14 lines
328 B
Text

--- ./approve.orig 2013-11-24 18:53:39.307114948 +0400
+++ ./approve 2013-11-24 18:45:58.000000000 +0400
@@ -70,9 +70,9 @@
if !$MAILER;
-require "getopts.pl";
+use Getopt::Std;
-&Getopts("df:") ||
+getopts("df:") ||
die("USAGE: approve [-f <config-file>] [-d] [<file> ...]\nStopped");
if (!defined($opt_f)) {