diff options
author | Stefan Metzmacher <metze@samba.org> | 2004-11-02 07:15:37 +0000 |
---|---|---|
committer | Gerald (Jerry) Carter <jerry@samba.org> | 2007-10-10 13:05:17 -0500 |
commit | 8867664ad2aea57d43a8547572af5de6db0968ba (patch) | |
tree | 1e9303a88cc1da6a89d10a4215a705b2d202fe99 /source4/build/smb_build/makefile.pl | |
parent | a42142439aee9e75796e25cdf05e042174926abf (diff) | |
download | samba-8867664ad2aea57d43a8547572af5de6db0968ba.tar.gz samba-8867664ad2aea57d43a8547572af5de6db0968ba.tar.bz2 samba-8867664ad2aea57d43a8547572af5de6db0968ba.zip |
r3465: fix SMB_SUBSYSTEM_NOPROTO()
metze
(This used to be commit e12595a750ea3f5ccc1ca8e628b707c0753394d7)
Diffstat (limited to 'source4/build/smb_build/makefile.pl')
-rw-r--r-- | source4/build/smb_build/makefile.pl | 19 |
1 files changed, 3 insertions, 16 deletions
diff --git a/source4/build/smb_build/makefile.pl b/source4/build/smb_build/makefile.pl index e0cb3d0d86..a3187daaa7 100644 --- a/source4/build/smb_build/makefile.pl +++ b/source4/build/smb_build/makefile.pl @@ -540,26 +540,13 @@ binary_$ctx->{BINARY}: basics bin/$ctx->{BINARY} # $proto_ctx->{OBJ_LIST} - the list of objectfiles which sould be scanned by make proto # # $output - the resulting output buffer -sub _prepare_proto_obj_list($$) +sub _prepare_proto_obj_list($) { my $ctx = shift; - my $noproto = shift; my $tmplist; my $output; - my %proto_obj; - use Data::Dumper; - foreach my $str (@{$ctx->{OBJ_LIST}}) { - $proto_obj{$str} = 1; - } - foreach my $str (keys %{$noproto}) { - if ($noproto->{$str}) { - delete $proto_obj{"\$(SUBSYSTEM_$str\_OBJS)"}; - } - } - - my @proto_list = (keys %proto_obj); - $tmplist = array2oneperline(\@proto_list); + $tmplist = array2oneperline($ctx->{OBJ_LIST}); $output = " ################################### @@ -669,7 +656,7 @@ sub _prepare_obj_lists($) $output .= _prepare_binary_obj_list(\%{$CTX->{OUTPUT}{BINARIES}{$key}}); } - $output .= _prepare_proto_obj_list(\%{$CTX->{OUTPUT}{PROTO}}, \%{$CTX->{INPUT}{SUBSYSTEMS}{NOPROTO}}); + $output .= _prepare_proto_obj_list(\%{$CTX->{OUTPUT}{PROTO}}); return $output; } |