[Module-build-checkins] Module-Build/lib/Module/Build/Platform Windows.pm,1.30,1.31

[Ken W. <kwi...@us...>]

Update of /cvsroot/module-build/Module-Build/lib/Module/Build/Platform
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29714/lib/Module/Build/Platform

Modified Files:
	Windows.pm 
Log Message:
Avoid a bareword-under-strict error when this sub isn't defined

Index: Windows.pm
===================================================================
RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Platform/Windows.pm,v
retrieving revision 1.30
retrieving revision 1.31
diff -u -d -r1.30 -r1.31
--- Windows.pm	23 Feb 2006 04:03:52 -0000	1.30
+++ Windows.pm	3 Mar 2006 23:04:38 -0000	1.31
@@ -105,7 +105,7 @@
 
       # Syntax differs between 9x & NT: the later requires a null arg (???)
       require Win32;
-      my $null_arg = (Win32::GetOSVersion == 2) ? '""' : '';
+      my $null_arg = (Win32::GetOSVersion() == 2) ? '""' : '';
       my $cmd = qq(start $null_arg /min "\%comspec\%" /c del "$full_progname");
 
       my $fh = IO::File->new(">> $basename.bat")