adding export to read mailbox status information, RT#15987

[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 0c0b4ac..e5e9d7e 100644 (file)
--- a/FS/FS/part_export/acct_sql.pm
+++ b/FS/FS/part_export/acct_sql.pm
@@ -5,7 +5,7 @@ use strict;
 use vars qw( %info );
 use FS::Record; #qw(qsearchs);
 
-my $options = __PACKAGE__->sql_options;
+my $options = { %{__PACKAGE__->sql_options} };#a new hashref so we don't pollute
 $options->{'crypt'} = { label => 'Password encryption',
                         type=>'select', options=>[qw(crypt md5 sha1_base64)],
                         default=>'crypt',