add cpanel export

[freeside.git] / FS / FS / part_export / acct_sql.pm

diff --git a/FS/FS/part_export/acct_sql.pm b/FS/FS/part_export/acct_sql.pm
index df33fda..4b92e80 100644 (file)
--- a/FS/FS/part_export/acct_sql.pm
+++ b/FS/FS/part_export/acct_sql.pm
@@ -1,6 +1,6 @@
 package FS::part_export::acct_sql;
 
-use vars qw(@ISA %info @saltset);
+use vars qw(@ISA %info);
 use Tie::IxHash;
 #use Digest::MD5 qw(md5_hex);
 use FS::Record; #qw(qsearchs);
@@ -32,7 +32,8 @@ tie my %vpopmail_map, 'Tie::IxHash',
   'pw_gid'    => 'gid',
   'pw_gecos'  => 'finger',
   'pw_dir'    => 'dir',
-  'pw_shell'  => 'shell',
+  #'pw_shell'  => 'shell',
+  'pw_shell'  => 'quota',
 ;
 my $vpopmail_map = join('\n', map "$_ $vpopmail_map{$_}", keys %vpopmail_map );
 
@@ -148,7 +149,7 @@ sub _export_replace {
   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');
                      $_ => $new->$value(@arg);
                    } keys %map;