On Wed, Sep 17, 2003 at 11:28:45PM +0200, Rafael Garcia-Suarez wrote:
> Orton, Yves wrote:
> > 
> > Attached is a patch that _should_ fix it. It moves the setting for LD to
> > init_linker() which in hindsight seems like a much more intelligent place
> > for it. Patch is against MM 6.17. I have successfully built the original
> > 5.6.2 test release using it and File::Spec 0.85
> 
> looks like it breaks lib/ExtUtils/t/MM_Unix.t (on Linux here)
> 
> lib/ExtUtils/t/MM_Unix...............#     Failed test (../lib/ExtUtils/t/MM_Unix.t 
> at line 241)
> #          got: 'cc'
> #     expected: ''
> FAILED at test 116

Maybe this helps?

Change 21264 by [EMAIL PROTECTED] on 2003/09/17 21:01:36

        A potential fix for non-empty LD in Unix.

Affected files ...

... //depot/perl/lib/ExtUtils/t/MM_Unix.t#18 edit

Differences ...

==== //depot/perl/lib/ExtUtils/t/MM_Unix.t#18 (text) ====
Index: perl/lib/ExtUtils/t/MM_Unix.t
--- perl/lib/ExtUtils/t/MM_Unix.t.~1~   Thu Sep 18 01:16:13 2003
+++ perl/lib/ExtUtils/t/MM_Unix.t       Thu Sep 18 01:16:13 2003
@@ -18,7 +18,7 @@
         plan skip_all => 'Non-Unix platform';
     }
     else {
-        plan tests => 116;
+        plan tests => 117;
     }
 }
 
@@ -237,8 +237,13 @@
 $t->init_linker;
 foreach (qw/ EXPORT_LIST PERL_ARCHIVE PERL_ARCHIVE_AFTER LD /)
 {
+    use Config;
     ok( exists $t->{$_}, "$_ was defined" );
-    is( $t->{$_}, '', "$_ is empty on Unix"); 
+    if (exists $Config{lc $_}) {
+       is($t->{$_}, $Config{lc $_}, "$_ is like in %Config ($t->{$_})"); 
+    } else {
+       is($t->{$_}, '', "$_ is empty on Unix"); 
+    }
 }
 
 
End of Patch.


-- 
Jarkko Hietaniemi <[EMAIL PROTECTED]> http://www.iki.fi/jhi/ "There is this special
biologist word we use for 'stable'.  It is 'dead'." -- Jack Cohen

Reply via email to