strepsirrhini/office-gobmx
9
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

#i10000# Correct regex in deliver.pl's linklib routine.

Browse source
This commit is contained in:
Rüdiger Timm 2008-10-31 10:25:47 +00:00
parent 2f8e77de11
commit 322b37ac33
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
solenv/bin/deliver.pl
View file

@ -244,8 +244,8 @@ sub do_linklib
foreach $lib (@globbed_files) {
$lib = basename($lib);
if ( $lib =~ /^(lib[\w-+]+(\.so|\.dylib))\.(\d+)\.(\d+)(\.(\d+))?$/
|| $lib =~ /^(lib[\w-+]+(\.so|\.dylib))\.(\d+)$/ )
if ( $lib =~ /^(lib\S+(\.so|\.dylib))\.(\d+)\.(\d+)(\.(\d+))?$/
|| $lib =~ /^(lib\S+(\.so|\.dylib))\.(\d+)$/ )
{
push(@{$globbed_hash{$1}}, $lib);
}
@ -257,7 +257,7 @@ sub do_linklib
foreach $lib_base ( sort keys %globbed_hash ) {
$lib = get_latest_patchlevel(@{$globbed_hash{$lib_base}});
if ( $lib =~ /^(lib[\w-+]+(\.so|\.dylib))\.(\d+)\.(\d+)(\.(\d+))?$/ )
if ( $lib =~ /^(lib\S+(\.so|\.dylib))\.(\d+)\.(\d+)(\.(\d+))?$/ )
{
$lib_major = "$lib_base.$3";
$long = 1;