Mercurial > hg > foxridge-archiver

diff unarchiver.pl @ 52:b762b5af6e42

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed problem with user recogintion by getlogin
author casties
date Wed, 10 Sep 2008 14:59:45 +0200
parents 724c615b5982
children 7958ac21f9bf
line wrap: on
line diff
--- a/unarchiver.pl	Wed Mar 21 15:22:27 2007 +0100
+++ b/unarchiver.pl	Wed Sep 10 14:59:45 2008 +0200
@@ -18,7 +18,7 @@
 #
 
 # program version
-my $version = "0.3.2 (21.3.2007)";
+my $version = "0.3.3 (10.9.2008)";
 
 # read command line parameters
 my $args = parseargs;
@@ -299,7 +299,7 @@
 logger("INFO", "unarchiver $version");
 
 # make shure the right user is running this program
-my $user = getlogin;
+my $user = getlogin || getpwuid($<);
 if (($user)&&($user ne "archive")&&($user ne "root")) {
     logger("ABORT", "you must be archive or root user to run this program!");
     exit 1;