Modified user definition for WIN95.

1997-10-21 21:18:19 +00:00
parent 499b4271cf
commit d450236074
1 changed files with 1 additions and 1 deletions
--- 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)
    {