quote directories with spaces
Ed J
5 years ago
| 218 | 218 | { |
| 219 | 219 | instpath => $instpath, |
| 220 | 220 | typemaps => \@typemaps, |
| 221 | inc => "-I$instpath $inc", | |
| 221 | inc => "-I". _quote_if_space($instpath) ." $inc", | |
| 222 | 222 | libs => $libs, |
| 223 | 223 | deps => \@deps, |
| 224 | 224 | } |
| 225 | 225 | } |
| 226 | ||
| 227 | sub _quote_if_space { $_[0] =~ / / ? qq{"$_[0]"} : $_[0] } | |
| 226 | 228 | |
| 227 | 229 | sub load_deps { |
| 228 | 230 | my $self = shift; |
| 361 | 363 | }, map { -d $_ ? ($_) : () } @INC); # only extant dirs |
| 362 | 364 | |
| 363 | 365 | if ($matching_file && -f $matching_file) { |
| 364 | push @found_libs, ('-L' . $matching_dir, '-l' . $stem); | |
| 366 | push @found_libs, | |
| 367 | '-L' . _quote_if_space($matching_dir), | |
| 368 | '-l' . $stem; | |
| 365 | 369 | # Android's linker ignores the RTLD_GLOBAL flag |
| 366 | 370 | # and loads everything as if under RTLD_LOCAL. |
| 367 | 371 | # What this means in practice is that modules need |