Author: jelmer
Date: 2005-09-08 20:34:35 +0000 (Thu, 08 Sep 2005)
New Revision: 10091

WebSVN: 
http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=10091

Log:
Fix perl warnings

Modified:
   branches/SAMBA_4_0/source/build/smb_build/config_mk.pm
   branches/SAMBA_4_0/source/build/smb_build/makefile.pm


Changeset:
Modified: branches/SAMBA_4_0/source/build/smb_build/config_mk.pm
===================================================================
--- branches/SAMBA_4_0/source/build/smb_build/config_mk.pm      2005-09-08 
20:29:19 UTC (rev 10090)
+++ branches/SAMBA_4_0/source/build/smb_build/config_mk.pm      2005-09-08 
20:34:35 UTC (rev 10091)
@@ -46,6 +46,7 @@
 #              which should be parsed
 sub run_config_mk($$)
 {
+       sub run_config_mk($$);
        my ($input, $filename) = @_;
        my $result;
        my $linenum = -1;

Modified: branches/SAMBA_4_0/source/build/smb_build/makefile.pm
===================================================================
--- branches/SAMBA_4_0/source/build/smb_build/makefile.pm       2005-09-08 
20:29:19 UTC (rev 10090)
+++ branches/SAMBA_4_0/source/build/smb_build/makefile.pm       2005-09-08 
20:34:35 UTC (rev 10091)
@@ -155,6 +155,8 @@
                next unless defined $_->{OUTPUT_TYPE};
                next unless ($_->{OUTPUT_TYPE} eq "BINARY");
 
+               next unless defined($_->{INSTALLDIR});
+
                push(@sbn_list, $_->{OUTPUT}) if ($_->{INSTALLDIR} eq 
"SBINDIR");
                push(@bbn_list, $_->{OUTPUT}) if ($_->{INSTALLDIR} eq "BINDIR");
        }

Reply via email to