This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Re: Win32 status - progress !
authorAbe Timmerman <abe@ztreet.demon.nl>
Mon, 14 Jan 2002 02:29:51 +0000 (03:29 +0100)
committerJarkko Hietaniemi <jhi@iki.fi>
Mon, 14 Jan 2002 00:27:41 +0000 (00:27 +0000)
Message-ID: <9rc44u4sl4hjfm32if71ggjlm0qpvvacs3@4ax.com>

p4raw-id: //depot/perl@14252

lib/ExtUtils/t/MM_Win32.t

index 7753926..846cca2 100644 (file)
@@ -215,7 +215,7 @@ EOSCRIPT
     isnt( MM->perl_script( $script_name ),
           "${script_name}$script_ext", 
           "not a perl_script anymore ($script_ext)" );
     isnt( MM->perl_script( $script_name ),
           "${script_name}$script_ext", 
           "not a perl_script anymore ($script_ext)" );
-    is( MM->perl_script( $script_name ), '',
+    is( MM->perl_script( $script_name ), undef,
         "perl_script ($script_ext) returns empty" );
 }
 unlink "${script_name}$script_ext" if -f "${script_name}$script_ext";
         "perl_script ($script_ext) returns empty" );
 }
 unlink "${script_name}$script_ext" if -f "${script_name}$script_ext";