diff options
| author | Björn Jacke <bj@sernet.de> | 2012-07-04 11:14:15 +0200 |
|---|---|---|
| committer | Bjoern Jacke <bj@sernet.de> | 2012-07-04 13:51:07 +0200 |
| commit | bb4995b0d1934f0a084714c8369e9fef46090df1 (patch) | |
| tree | 9030c86b39e205cfdf1219bde28994cc1aaf7d30 | |
| parent | fa98ef112b09083675afcedae3617742a0f9d5e7 (diff) | |
| download | samba-bb4995b0d1934f0a084714c8369e9fef46090df1.tar.gz samba-bb4995b0d1934f0a084714c8369e9fef46090df1.tar.bz2 samba-bb4995b0d1934f0a084714c8369e9fef46090df1.zip | |
s4/heimdal: fix make-proto.pl with perl 5.16
Thanks to Torsten Kurbad. This fixes #9025.
Autobuild-User(master): Björn Jacke <bj@sernet.de>
Autobuild-Date(master): Wed Jul 4 13:51:07 CEST 2012 on sn-devel-104
| -rw-r--r-- | source4/heimdal/cf/make-proto.pl | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/source4/heimdal/cf/make-proto.pl b/source4/heimdal/cf/make-proto.pl index 6894dc143e..07b53f9a8c 100644 --- a/source4/heimdal/cf/make-proto.pl +++ b/source4/heimdal/cf/make-proto.pl @@ -1,8 +1,7 @@ # Make prototypes from .c files # $Id$ -##use Getopt::Std; -require 'getopts.pl'; +use Getopt::Std; my $comment = 0; my $if_0 = 0; @@ -13,7 +12,7 @@ my $oproto = 1; my $private_func_re = "^_"; my %depfunction = (); -Getopts('x:m:o:p:dqE:R:P:') || die "foo"; +getopts('x:m:o:p:dqE:R:P:') || die "foo"; if($opt_d) { $debug = 1; |