projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
masonize fix: avoid newline prepend fix from borking indented first <%, fixes custome...
[freeside.git]
/
bin
/
sqlradius.import
diff --git
a/bin/sqlradius.import
b/bin/sqlradius.import
index
7203365
..
e8b6394
100644
(file)
--- a/
bin/sqlradius.import
+++ b/
bin/sqlradius.import
@@
-117,7
+117,7
@@
while ( defined ( $row = $sth->fetchrow_arrayref ) ) {
foreach my $rc_row ( @{$rc_sth->fetchall_arrayref} ) {
my($attribute, $value, $name, $groupname) = @$row;
foreach my $rc_row ( @{$rc_sth->fetchall_arrayref} ) {
my($attribute, $value, $name, $groupname) = @$row;
- if ( $attribute =~ /^(
Crypt
-)?Password$/ ) {
+ if ( $attribute =~ /^(
(User|Crypt)
-)?Password$/ ) {
$password = $value;
$finger = $name;
$group = $groupname;
$password = $value;
$finger = $name;
$group = $groupname;
@@
-134,9
+134,8
@@
while ( defined ( $row = $sth->fetchrow_arrayref ) ) {
'finger' => $finger,
};
'finger' => $finger,
};
- my($error);
- $error = $svc_acct->insert;
- #$error = $svc_acct->check;
+ my $error = $svc_acct->insert;
+ #my $error = $svc_acct->check;
if ( $error ) {
if ( $error =~ /duplicate/i ) {
warn "$r_username / $realm: $error";
if ( $error ) {
if ( $error =~ /duplicate/i ) {
warn "$r_username / $realm: $error";