Patrick Williams | c124f4f | 2015-09-15 14:41:29 -0500 | [diff] [blame] | 1 | ext/DynaLoader/t/DynaLoader.t: fix calling dl_findfile() failed |
| 2 | |
| 3 | Use '$Config{libc}' as the libc file name |
| 4 | |
| 5 | Upstream-Status: Inappropriate |
| 6 | Signed-off-by: Hongxu Jia <hongxu.jia@windriver.com> |
| 7 | --- |
| 8 | ext/DynaLoader/t/DynaLoader.t | 2 +- |
| 9 | 1 file changed, 1 insertion(+), 1 deletion(-) |
| 10 | |
| 11 | diff --git a/ext/DynaLoader/t/DynaLoader.t b/ext/DynaLoader/t/DynaLoader.t |
| 12 | index ade1f8e..3567afe 100644 |
| 13 | --- a/ext/DynaLoader/t/DynaLoader.t |
| 14 | +++ b/ext/DynaLoader/t/DynaLoader.t |
| 15 | @@ -106,7 +106,7 @@ ok( defined $dlerr, "dl_error() returning an error message: '$dlerr'" ); |
| 16 | # ... dl_findfile() |
| 17 | SKIP: { |
| 18 | my @files = (); |
| 19 | - eval { @files = DynaLoader::dl_findfile("c") }; |
| 20 | + eval { @files = DynaLoader::dl_findfile($Config{libc}) }; |
| 21 | is( $@, '', "calling dl_findfile()" ); |
| 22 | # Some platforms are known to not have a "libc" |
| 23 | # (not at least by that name) that the dl_findfile() |
| 24 | -- |
| 25 | 1.8.1.2 |
| 26 | |