Subversion Repositories DevTools

Rev

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

Rev 311 Rev 313
Line 126... Line 126...
126 
 
 126 
 
127 
    EnvImportOptional ( 'GBE_DPKG_STORE','' );
 127 
    EnvImportOptional ( 'GBE_DPKG_STORE','' );
128 
    EnvImportOptional ( 'GBE_DPKG_CACHE','' );
 128 
    EnvImportOptional ( 'GBE_DPKG_CACHE','' );
129 
    EnvImportOptional ( 'GBE_DPKG_LOCAL','' );
 129 
    EnvImportOptional ( 'GBE_DPKG_LOCAL','' );
130 
    EnvImportOptional ( 'GBE_DPKG_SBOX' ,'' );
 130 
    EnvImportOptional ( 'GBE_DPKG_SBOX' ,'' );
- 
 
 131 
    EnvImportOptional ( 'GBE_DPLY'      ,'' );
131 
 
 132 
 
132 
    EnvImportOptional ( 'GBE_PLATFORM' );           # optional PLATFORM filter
 133 
    EnvImportOptional ( 'GBE_PLATFORM' );           # optional PLATFORM filter
133 
    EnvImportOptional ( 'GBE_BUILDFILTER' );        # optional BUILD filter
134 
    EnvImportOptional ( 'GBE_BUILDFILTER' );        # optional BUILD filter
134 
    EnvImportOptional ( 'GBE_ABT' );                # optional ABT flags
135 
    EnvImportOptional ( 'GBE_ABT' );                # optional ABT flags
135
136
Line 150... Line 151...
150 
    Debug( "Cwd:       $Cwd" );
 151 
    Debug( "Cwd:       $Cwd" );
151 
    Debug( "Makelib:   $Makelib" );
 152 
    Debug( "Makelib:   $Makelib" );
152 
    Debug( "BuildFile: $ScmBuildSrc" );
 153 
    Debug( "BuildFile: $ScmBuildSrc" );
153 
 
 154 
 
154 
    Verbose ("Command Line: @ARGV");
 155 
    Verbose ("Command Line: @ARGV");
155 
    my $result = GetOptions (
 - 
 
156 
                "help|h:+"      => \$opt_help,
 156 
    my $result = GetOptions( "help|h:+"      => \$opt_help,
157 
                "man:3"         => \$opt_help,
 157 
                             "man:3"         => \$opt_help,
158 
                "debug:+"       => \$::ScmDebug,
 158 
                             "debug:+"       => \$::ScmDebug,
159 
                "verbose:+"     => \$::ScmVerbose,
 159 
                             "verbose:+"     => \$::ScmVerbose,
160 
                "expert:1"      => \$Expert,
 160 
                             "expert:1"      => \$Expert,
161 
                "all"           => \$All,
 161 
                             "all"           => \$All,
162 
                "nolog"         => \$Nolog,
 162 
                             "nolog"         => \$Nolog,
163 
                "cache+"        => \$Cache,
 163 
                             "cache+"        => \$Cache,
164 
                "project"       => \$FullJats,
 164 
                             "project"       => \$FullJats,
165 
                "package"       => \$NoPackageError,
 165 
                             "package"       => \$NoPackageError,
166 
                "forcebuildpkg" => \$ForceBuildPkg,
 166 
                             "forcebuildpkg" => \$ForceBuildPkg,
167 
                );
 167 
                             );
168 
    Usage() if ( $opt_help || !$result );
 168 
    Usage() if ( $opt_help || !$result );
169 
 
 169 
 
170 
    Debug( "Debug:         $::ScmDebug" );
 170 
    Debug( "Debug:         $::ScmDebug" );
171 
    Debug( "Verbose:       $::ScmVerbose" );
 171 
    Debug( "Verbose:       $::ScmVerbose" );
172 
    Debug( "Expert:        $Expert" );
 172 
    Debug( "Expert:        $Expert" );
Line 1606... Line 1606...
1606 
                       split( $::ScmPathSep, $::GBE_DPKG_LOCAL),
 1606 
                       split( $::ScmPathSep, $::GBE_DPKG_LOCAL),
1607 
                       '--NotLocal',
 1607 
                       '--NotLocal',
1608 
                       split( $::ScmPathSep, $::GBE_DPKG_CACHE),
 1608 
                       split( $::ScmPathSep, $::GBE_DPKG_CACHE),
1609 
                       '--NotCache',
 1609 
                       '--NotCache',
1610 
                       split( $::ScmPathSep, $::GBE_DPKG),
 1610 
                       split( $::ScmPathSep, $::GBE_DPKG),
- 
 
 1611 
                       split( $::ScmPathSep, $::GBE_DPLY),
1611 
                       split( $::ScmPathSep, $::GBE_DPKG_STORE) )
 1612 
                       split( $::ScmPathSep, $::GBE_DPKG_STORE) )
1612 
    {
 1613 
    {
1613 
 
 1614 
 
1614 
        #
 1615 
        #
1615 
        #   Detect various tags that have been placed in the search list
 1616 
        #   Detect various tags that have been placed in the search list