commit 63a165441f2a3d579246328095b487c7add432ca
from: jrmu <jrmu@ircnow.org>
date: Sat Feb 25 03:34:01 2023 UTC

Fixed issue in BNC.pm

commit - e2bd2c97ad167326b0f687b458eeed816a7ee239
commit + 63a165441f2a3d579246328095b487c7add432ca
blob - 3a22b1e1a6f417d67c5844c3e4b2e3e7395ce34b
blob + cb94e28890b7f9467466bbd5bba414a51fab2932
--- BNC.pm
+++ BNC.pm
@@ -163,14 +163,14 @@ sub mbnc {
 		my ($username, $email) = ($1, $2);
 		my @userrows = SQLite::selectrows("bnc", "username", $username);
 		my @emailrows = SQLite::selectrows("bnc", "email", $email);
-		foreach my $row (@rows @emailrows) {
+		foreach my $row (push(@userrows,@emailrows)) {
+			my $password = SQLite::get("bnc", "ircid", $row->{id}, "password");
 			if (defined($password)) {
 				main::putserv($bot, "PRIVMSG $nick :Sorry, only one account per person. Please contact staff if you need help.");
 				return;
 			}
 		}
 
-
 #		my @users = treeget($znctree, "User", "Node");
 		foreach my $user (@users) {
 			if ($user eq $username) {