Subversion Repositories DevTools

Rev

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

Rev 4595 Rev 4752
Line 421... Line 421...
421 
    #
 421 
    #
422 
    #   Create search entries suitable for the CopyDir
 422 
    #   Create search entries suitable for the CopyDir
423 
    #   We will delete entries as the files are copied
 423 
    #   We will delete entries as the files are copied
424 
    #   Allow for:
 424 
    #   Allow for:
425 
    #       jar files to have a .jar suffix (optional)
 425 
    #       jar files to have a .jar suffix (optional)
426 
    #       jar files to have path specifuied with a package
 426 
    #       jar files to have path specified with a package
427 
    #
 427 
    #
428 
    foreach my $item ( @opt_jars) {
 428 
    foreach my $item ( @opt_jars) {
429 
        $item =~ s~\.jar~~i;
 429 
        $item =~ s~\.jar~~i;
430 
        if ($item =~ m~/~)
 430 
        if ($item =~ m~/~)
431 
        {
 431 
        {
Line 467... Line 467...
467 
                        'SymlinkFiles' => 1,
 467 
                        'SymlinkFiles' => 1,
468 
                        'Examine' => sub
468 
                        'Examine' => sub
469 
                            {
 469 
                            {
470 
                                my ($opt) = @_;
 470 
                                my ($opt) = @_;
471 
                                ArrayDelete \@jlist, $opt->{file};
 471 
                                ArrayDelete \@jlist, $opt->{file};
- 
 
 472 
                                return 1;
472 
                            },
 473 
                            },
473 
                        );
 474 
                        );
474 
        }
 475 
        }
475 
 
 476 
 
476 
        #
 477 
        #