freeside/FS/FS/part_export acct_sql.pm,1.8,1.9

[ivan]

Update of /home/cvs/cvsroot/freeside/FS/FS/part_export
In directory pouncequick:/tmp/cvs-serv25081

Modified Files:
	acct_sql.pm 
Log Message:
hehe oops

Index: acct_sql.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/part_export/acct_sql.pm,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -d -r1.8 -r1.9
--- acct_sql.pm	20 Apr 2005 06:41:39 -0000	1.8
+++ acct_sql.pm	20 Apr 2005 07:12:14 -0000	1.9
@@ -112,7 +112,7 @@
   my %record = map { my $value = $map{$_};
                      my @arg = ();
                      push @arg, $self->option('crypt')
-                       if $_ eq 'crypt_password' && $self->option('crypt');
+                       if $value eq 'crypt_password' && $self->option('crypt');
                      $_ => $svc_acct->$value(@arg);
                    } keys %map;