Subversion Repositories DevTools

Rev

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

Rev 315 Rev 317
Line 472... Line 472...
472
#   Change to the required root directory
472
#   Change to the required root directory
473
#       The user may specify a start directory( -c )
473
#       The user may specify a start directory( -c )
474
#
474
#
475
change_dir ( $opt_dir );
475
change_dir ( $opt_dir );
476
 
476
 
477
 
-
 
478
################################################################################
477
################################################################################
479
#   Locate the root of the build - if required
478
#   Locate the root of the build - if required
480
#   This is used by the autobuild tools to:
479
#   This is used by the autobuild tools to:
481
#       1) Locate the build.pl file for JATS based builds
480
#       1) Locate the build.pl file for JATS based builds
482
#          The name of the target package can be provided to resolve
481
#          The name of the target package can be provided to resolve
Line 844... Line 843...
844
 
843
 
845
################################################################################
844
################################################################################
846
#   Windows: Ensure that cmd.exe is in the users PATH
845
#   Windows: Ensure that cmd.exe is in the users PATH
847
#            If cmd.exe cannot be found then the 'system' command will not work
846
#            If cmd.exe cannot be found then the 'system' command will not work
848
#
847
#
849
unless ( $GBE_UNIX )
848
unless ( $GBE_JATS_SANE || $GBE_UNIX )
850
{
849
{
851
    my $cmd_found;
850
    my $cmd_found;
852
    foreach ( split $PSPLIT, $PATH )
851
    foreach ( split $PSPLIT, $PATH )
853
    {
852
    {
854
        my $file = $_ . "/cmd.exe";
853
        my $file = $_ . "/cmd.exe";
Line 871... Line 870...
871
#   will fail. This is impossible to detect and fix within make so do it here
870
#   will fail. This is impossible to detect and fix within make so do it here
872
#
871
#
873
#   Note: JATS no longer allows these environment variables through to the
872
#   Note: JATS no longer allows these environment variables through to the
874
#         makefiles.
873
#         makefiles.
875
#
874
#
876
unless ( $GBE_UNIX )
875
unless ( $GBE_JATS_SANE || $GBE_UNIX )
877
{
876
{
878
    for my $var qw ( LIB INCLUDE )
877
    for my $var qw ( LIB INCLUDE )
879
    {
878
    {
880
        my $evar = $ENV{$var};
879
        my $evar = $ENV{$var};
881
        if ( $evar )
880
        if ( $evar )