summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2012-01-15 04:14:06 +0000
committerivan <ivan>2012-01-15 04:14:06 +0000
commit25180d667effd00ae7c51ca8a51c806ece049547 (patch)
tree0e3c849e2f7529a814e3fb7aec363c1320d1a2e0
parentea3ce8d7f076e7fecff4be7ae63bc413adb0adf5 (diff)
adding export to read mailbox status information, RT#15987
-rw-r--r--FS/FS/part_export/acct_sql.pm2
-rw-r--r--FS/FS/part_export/acct_sql_status.pm3
2 files changed, 3 insertions, 2 deletions
diff --git a/FS/FS/part_export/acct_sql.pm b/FS/FS/part_export/acct_sql.pm
index 0c0b4ac30..e5e9d7e38 100644
--- 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',
diff --git a/FS/FS/part_export/acct_sql_status.pm b/FS/FS/part_export/acct_sql_status.pm
index 5ad462e7f..bcc1e0116 100644
--- a/FS/FS/part_export/acct_sql_status.pm
+++ b/FS/FS/part_export/acct_sql_status.pm
@@ -5,11 +5,12 @@ use strict;
use warnings;
use vars qw( %info );
-my $options = __PACKAGE__->sql_options;
+my $options = { %{__PACKAGE__->sql_options} };#a new hashref so we don't pollute
delete $options->{$_} for qw( table schema static primary_key );
%info = (
'svc' => 'svc_acct',
+ 'desc' => 'Mailbox status information from SQL',
'options' => $options,
'nodomain' => '',
'notes' => <<END