diff options
Diffstat (limited to 'Tools/scripts/mkptools/mkpinstall')
| -rwxr-xr-x | Tools/scripts/mkptools/mkpinstall | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/Tools/scripts/mkptools/mkpinstall b/Tools/scripts/mkptools/mkpinstall index 54a24750cedf..e451601d9f9a 100755 --- a/Tools/scripts/mkptools/mkpinstall +++ b/Tools/scripts/mkptools/mkpinstall @@ -1,6 +1,6 @@ #!/usr/bin/perl -w # -# Copyright (c) 2000 Neil Blakey-Milner +# Copyright (c) 2001 Neil Blakey-Milner # All rights reserved. # # Redistribution and use in source and binary forms, with or without @@ -44,8 +44,9 @@ sub testdir (@) { return ""; } -my ($user, $origdir, $portname, $tmpbase, $tmpdir, $wdpdir, $predir, $hmake); -chomp ($user = `logname`); +my ($user, $group, $origdir, $portname, $tmpbase, $tmpdir, $wdpdir, $predir, $hmake); +chomp ($user = `id -un`); +chomp ($group = `id -gn`); chomp ($origdir = `pwd`); chomp ($portname = `basename $origdir`); $tmpbase = testdir($ENV{'TMPDIR'}, $ENV{'TMP'}, $path_tmp); |