Subversion Repositories DevTools

Rev

Rev 7447 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7447 Rev 7547
Line 276... Line 276...
276 
        {
 276 
        {
277 
            penv    $_ if ( m ~^GBE_SVN_URL~ );
 277 
            penv    $_ if ( m ~^GBE_SVN_URL~ );
278 
        }
 278 
        }
279 
        $indent = pop @indents;
 279 
        $indent = pop @indents;
280 
    }
 280 
    }
- 
 
 281 
 
- 
 
 282 
    if ( $opt_verbose || $ENV{GBE_GIT_PATH} )
- 
 
 283 
    {
- 
 
 284 
        print "\nGIT Binary\n";
- 
 
 285 
        denv    "GBE_GIT_PATH";
- 
 
 286 
        print "\nGIT Repository Paths\n";
- 
 
 287 
        push @indents, $indent;
- 
 
 288 
        $indent = 24;
- 
 
 289 
        foreach ( sort keys %ENV )
- 
 
 290 
        {
- 
 
 291 
            penv    $_ if ( m ~^GBE_GIT_URL~ );
- 
 
 292 
        }
- 
 
 293 
        $indent = pop @indents;
- 
 
 294 
    }
281
295
282 
    if ( $opt_verbose && ! $GBE_UNIX)
 296 
    if ( $opt_verbose && ! $GBE_UNIX)
283 
    {
 297 
    {
284 
        print "\nWindows Environment\n";
 298 
        print "\nWindows Environment\n";
285 
        denv  "TEMP";
 299 
        denv  "TEMP";