sin/samba-mirror
1
0
Fork 0
mirror of https://github.com/samba-team/samba.git synced 2024-12-22 13:34:15 +03:00
Code

s4/heimdal: fix make-proto.pl with perl 5.16

Browse Source 
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
This commit is contained in:
Björn Jacke 2012-07-04 11:14:15 +02:00 committed by Bjoern Jacke
parent fa98ef112b
commit bb4995b0d1
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
source4/heimdal/cf/make-proto.pl
View File

@ -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;