develooper Front page | perl.perl5.porters | Postings from May 2007

[PATCH] Fix DynaLoader::dl_findfile() to locate .so files again

Thread Next
From:
Jan Dubois
Date:
May 31, 2007 13:17
Subject:
[PATCH] Fix DynaLoader::dl_findfile() to locate .so files again
Message ID:
00a501c7a3c0$b2d880d0$18898270$@com
Change 23348 broke dl_findfile() for locating shared libraries by
interpolating $Config::Config{'so'} with surrounding quotes into
the filename:

            push(@names,"lib$_.'so'");
            push(@names,"lib$_.a");

This breaks for example Tk on Solaris using openwin.

Cheers,
-Jan

--- ext/DynaLoader/DynaLoader_pm.PL.~1~       Thu May 31 13:09:53 2007
+++ ext/DynaLoader/DynaLoader_pm.PL   Thu May 31 13:09:53 2007
@@ -518,7 +518,7 @@
         my(@names, $name);    # what filenames to look for
         if (m:-l: ) {          # convert -lname to appropriate library name
             s/-l//;
-            push(@names,"lib$_.<<=to_string($Config::Config{'so'})>>");
+            push(@names,"lib$_.<<=$dl_so>>");
             push(@names,"lib$_.a");
         } else {                # Umm, a bare name. Try various alternatives:
             # these should be ordered with the most likely first
End of Patch.


Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About