Subversion Repositories DevTools

Rev

Rev 5709 | Rev 5744 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5709 Rev 5726
Line 2977... Line 2977...
2977
        #
2977
        #
2978
        unless ( @build_warn )
2978
        unless ( @build_warn )
2979
        {
2979
        {
2980
            use JatsMakeInfo;
2980
            use JatsMakeInfo;
2981
            ReadMakeInfo();
2981
            ReadMakeInfo();
2982
                my $line = $::ScmBuildFilter || '';
2982
            my $line = $::ScmBuildFilter || '';
2983
                $line =~ s~\s+~ ~g;
2983
            $line =~ s~\s+~ ~g;
2984
 
2984
 
2985
                my $filter = $::GBE_BUILDFILTER;
2985
            my $filter = $::GBE_BUILDFILTER || '';
2986
                $filter =~ s~\s+~ ~g;
2986
            $filter =~ s~\s+~ ~g;
2987
                if ( $line ne $filter )
2987
            if ( $line ne $filter )
2988
                {
2988
            {
2989
                    push @build_warn, "Build filter has changed";
2989
                push @build_warn, "Build filter has changed";
2990
                    Verbose2 ("Buildfilter Test: Was:$line, Is:$::GBE_BUILDFILTER");
2990
                Verbose2 ("Buildfilter Test: Was:$line, Is:$::GBE_BUILDFILTER");
2991
                }
2991
            }
2992
        }
2992
        }
2993
 
2993
 
2994
        if ( @build_warn )
2994
        if ( @build_warn )
2995
        {
2995
        {
2996
            Verbose ("Forcing Build.", @build_warn );
2996
            Verbose ("Forcing Build.", @build_warn );