From f2e9d8413d6178a6248c8b5d47ac06b1d1f12cb5 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 22 Jun 2004 03:10:33 +0000
Subject: [PATCH] fix attribute importing bugs that borked the passwords

---
 bin/sqlradius.import | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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;
-- 
2.11.0