diff --git a/src/makeBaseApp/makeBaseApp.pl b/src/makeBaseApp/makeBaseApp.pl
index 40db931a7..5f5efd71a 100755
--- a/src/makeBaseApp/makeBaseApp.pl
+++ b/src/makeBaseApp/makeBaseApp.pl
@@ -219,7 +219,7 @@ sub GetUser # no args
 
     # add to this list if new possibilities arise,
     # currently it's UNIX and WIN32:
-    $user=$ENV{USER} || $ENV{USERNAME};
+    $user=$ENV{USER} || $ENV{USERNAME} || Win32::LoginName();
 
     unless ($user)
     {