[svn:parrot] r16864 - in trunk: . ext/Parrot-Embed

[chromatic]

Author: chromatic
Date: Fri Feb  2 00:16:04 2007
New Revision: 16864

Modified:
   trunk/   (props changed)
   trunk/ext/Parrot-Embed/Build.PL

Log:
 [EMAIL PROTECTED]:  chromatic | 2007-02-01 23:16:14 -0800
 [Parrot::Embed] Improve in-tree dynamic linking by using Config.


Modified: trunk/ext/Parrot-Embed/Build.PL
==============================================================================
--- trunk/ext/Parrot-Embed/Build.PL     (original)
+++ trunk/ext/Parrot-Embed/Build.PL     Fri Feb  2 00:16:04 2007
@@ -2,6 +2,7 @@
 use warnings;
 
 use Cwd;
+use Config;
 use Module::Build;
 use File::Spec::Functions qw( rel2abs catdir catfile updir path );
 
@@ -66,6 +67,7 @@
 
 sub get_dl_env_var
 {
+    return $Config{ldlibpthname};
     return 'DYLD_LIBRARY_PATH' if $^O =~ /darwin/;
     return 'PATH'              if $^O =~ /Win32/;
     return 'LD_LIBRARY_PATH';