From: ivan Date: Tue, 22 Jun 2004 03:10:33 +0000 (+0000) Subject: fix attribute importing bugs that borked the passwords X-Git-Tag: BEFORE_FINAL_MASONIZE~1021 X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=f2e9d8413d6178a6248c8b5d47ac06b1d1f12cb5;ds=sidebyside fix attribute importing bugs that borked the passwords --- diff --git a/bin/sqlradius.import b/bin/sqlradius.import index e8b63949c..e75f65b17 100644 --- a/bin/sqlradius.import +++ b/bin/sqlradius.import @@ -116,7 +116,7 @@ while ( defined ( $row = $sth->fetchrow_arrayref ) ) { $rc_sth->execute($r_username, $realm) or die $rc_sth->errstr; foreach my $rc_row ( @{$rc_sth->fetchall_arrayref} ) { - my($attribute, $value, $name, $groupname) = @$row; + my($attribute, $value, $name, $groupname) = @$rc_row; if ( $attribute =~ /^((User|Crypt)-)?Password$/ ) { $password = $value; $finger = $name;