From: Dirk Koopman <djk@tobit.co.uk>
Date: Fri, 15 May 2020 15:58:36 +0000 (+0100)
Subject: Merge branch 'newusers' of ssh://server/scm/spider into newusers
X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=974aca6b8ccf37405098dd3c465a938da5f85eac;hp=b33cb7a3d3842fabb787105b89aa1094bf5372e0;p=spider.git

Merge branch 'newusers' of ssh://server/scm/spider into newusers
---

diff --git a/perl/DXUser.pm b/perl/DXUser.pm
index 5dd1ced2..d2082d68 100644
--- a/perl/DXUser.pm
+++ b/perl/DXUser.pm
@@ -157,9 +157,9 @@ sub init
 	}
 	
 	if ($mode) {
-		$dbm = tie (%u, 'DB_File', $ufn, O_CREAT|O_RDWR, 0666, $DB_BTREE) or confess "can't open user file: $fn ($!) [rebuild it from user_asc?]";
+		$dbm = tie (%u, 'DB_File', $ufn, O_CREAT|O_RDWR, 0666, $DB_BTREE) or confess "can't open user file: $ufn ($!) [rebuild it from user_asc?]";
 	} else {
-		$dbm = tie (%u, 'DB_File', $ufn, O_RDONLY, 0666, $DB_BTREE) or confess "can't open user file: $fn ($!) [rebuild it from user_asc?]";
+		$dbm = tie (%u, 'DB_File', $ufn, O_RDONLY, 0666, $DB_BTREE) or confess "can't open user file: $ufn ($!) [rebuild it from user_asc?]";
 	}
 
 	die "Cannot open $ufn ($!)\n" unless $dbm;