[Module-build-checkins] Module-Build/lib/Module/Build Base.pm,1.426,1.427

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

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

Modified Files:
	Base.pm 
Log Message:
FIX THIS FOR REAL

Index: Base.pm
===================================================================
RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Base.pm,v
retrieving revision 1.426
retrieving revision 1.427
diff -u -d -r1.426 -r1.427
--- Base.pm	13 Jun 2005 21:35:22 -0000	1.426
+++ Base.pm	16 Jun 2005 18:44:06 -0000	1.427
@@ -1246,7 +1246,7 @@
   my @os_home_envs = qw( APPDATA HOME USERPROFILE WINDIR SYS$LOGIN );
   
   foreach ( @os_home_envs ) {
-    return $_ if exists $ENV{$_} && defined $ENV{$_} && length $ENV{$_} && -d $ENV{$_};
+    return $ENV{$_} if exists $ENV{$_} && defined $ENV{$_} && length $ENV{$_} && -d $ENV{$_};
   }
   
   return;