Subversion Repositories DevTools

Rev

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

Rev 407 Rev 409
Line 1324... Line 1324...
1324 
# Returns         : Path
 1324 
# Returns         : Path
1325 
#
 1325 
#
1326 
sub ResolveLibFile
 1326 
sub ResolveLibFile
1327 
{
 1327 
{
1328 
    my ($from_package, $file) = @_;
 1328 
    my ($from_package, $file) = @_;
1329 
    my @path = $from_package ? ($opt_pkgdir . '/lib', $opt_interfacedir . '/lib') : ($opt_bindir, $opt_localbindir);
 1329 
    my @path = $from_package ? ($opt_pkgdir . '/lib', $opt_interfacedir . '/lib') : ($opt_libdir, $opt_locallibdir);
1330 
    my $wildcard = ($file =~ /[*?]/);
 1330 
    my $wildcard = ($file =~ /[*?]/);
1331 
    my @options;
 1331 
    my @options;
1332 
    my $num_dll;
 1332 
    my $num_dll;
1333 
 
 1333 
 
1334 
    #
 1334 
    #
1335 
    #   Extract options from file
 1335 
    #   Extract options from file
1336 
    #
 1336 
    #
- 
 
 1337 
    $num_dll = 0;
1337 
    ($file, @options) = split ( ',', $file);
 1338 
    ($file, @options) = split ( ',', $file);
1338 
    foreach ( @options )
 1339 
    foreach ( @options )
1339 
    {
 1340 
    {
1340 
        if ( m/^--Dll/ ) {
 1341 
        if ( m/^--Dll/ ) {
1341 
            $num_dll = 1;
 1342 
            $num_dll = 1;