Bernard Johnson 03b3162
diff -Naur BackupPC-3.3.0-pristine/lib/BackupPC/CGI/Lib.pm BackupPC-3.3.0/lib/BackupPC/CGI/Lib.pm
Bernard Johnson 03b3162
--- BackupPC-3.3.0-pristine/lib/BackupPC/CGI/Lib.pm	2013-04-14 14:43:32.000000000 -0600
Bernard Johnson 03b3162
+++ BackupPC-3.3.0/lib/BackupPC/CGI/Lib.pm	2014-02-21 22:42:25.844412429 -0700
Bernard Johnson 03b3162
@@ -144,7 +144,7 @@
Bernard Johnson 03b3162
     # Verify we are running as the correct user
Bernard Johnson 03b3162
     #
Bernard Johnson 03b3162
     if ( $Conf{BackupPCUserVerify}
Bernard Johnson 03b3162
-	    && $> != (my $uid = (getpwnam($Conf{BackupPCUser}))[2]) ) {
Bernard Johnson 03b3162
+	    && $> != (my $uid = (getpwnam($Conf{BackupPCUser}))) ) {
Bernard Johnson 03b3162
 	ErrorExit(eval("qq{$Lang->{Wrong_user__my_userid_is___}}"), <
Bernard Johnson 03b3162
 This script needs to run as the user specified in \$Conf{BackupPCUser},
Bernard Johnson 03b3162
 which is set to $Conf{BackupPCUser}.
Bernard Johnson 03b3162
diff -Naur BackupPC-3.3.0-pristine/lib/BackupPC/Lib.pm BackupPC-3.3.0/lib/BackupPC/Lib.pm
Bernard Johnson 03b3162
--- BackupPC-3.3.0-pristine/lib/BackupPC/Lib.pm	2013-04-14 14:43:32.000000000 -0600
Bernard Johnson 03b3162
+++ BackupPC-3.3.0/lib/BackupPC/Lib.pm	2014-02-21 22:39:24.037478780 -0700
Bernard Johnson 03b3162
@@ -160,7 +160,7 @@
Bernard Johnson 03b3162
     #
Bernard Johnson 03b3162
     if ( !$noUserCheck
Bernard Johnson 03b3162
 	    && $bpc->{Conf}{BackupPCUserVerify}
Bernard Johnson 03b3162
-	    && $> != (my $uid = (getpwnam($bpc->{Conf}{BackupPCUser}))[2]) ) {
Bernard Johnson 03b3162
+	    && $> != (my $uid = (getpwnam($bpc->{Conf}{BackupPCUser}))) ) {
Bernard Johnson 03b3162
 	print(STDERR "$0: Wrong user: my userid is $>, instead of $uid"
Bernard Johnson 03b3162
 	    . " ($bpc->{Conf}{BackupPCUser})\n");
Bernard Johnson 03b3162
 	print(STDERR "Please su $bpc->{Conf}{BackupPCUser} first\n");