diff options
| author | Jacob Pipkin <j@dawnrazor.net> | 2012-11-01 21:56:35 -0500 |
|---|---|---|
| committer | Jacob Pipkin <j@dawnrazor.net> | 2012-11-01 21:56:35 -0500 |
| commit | 41fc4d35c0fbd6f27899aecf2405f854a892f102 (patch) | |
| tree | 501ab0febcc8a9115bda6d3ef20a98d19b1e10e6 /SBO-Lib/lib/SBO/Lib.pm | |
| parent | 64fe43f714525ee054e33bc8ff6ac51d539931ab (diff) | |
| download | sbotools2-41fc4d35c0fbd6f27899aecf2405f854a892f102.tar.xz | |
in get_filename_from_link, added only do the substitution if $filename
Diffstat (limited to 'SBO-Lib/lib/SBO/Lib.pm')
| -rw-r--r-- | SBO-Lib/lib/SBO/Lib.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/SBO-Lib/lib/SBO/Lib.pm b/SBO-Lib/lib/SBO/Lib.pm index 7b9dff7..c7c186b 100644 --- a/SBO-Lib/lib/SBO/Lib.pm +++ b/SBO-Lib/lib/SBO/Lib.pm @@ -366,7 +366,7 @@ sub get_filename_from_link ($) { my $fn = shift; my $regex = qr#/([^/]+)$#; my $filename = $fn =~ $regex ? $distfiles .'/'. ($fn =~ $regex)[0] : undef; - $filename =~ s/%2B/+/g; + $filename =~ s/%2B/+/g if $filename; return $filename; } @@ -771,4 +771,4 @@ sub get_build_queue ($$) { push @build_queue, $sb; } return \@build_queue; -}
\ No newline at end of file +} |