diff options
author | ivan <ivan> | 2012-01-15 04:14:06 +0000 |
---|---|---|
committer | ivan <ivan> | 2012-01-15 04:14:06 +0000 |
commit | 25180d667effd00ae7c51ca8a51c806ece049547 (patch) | |
tree | 0e3c849e2f7529a814e3fb7aec363c1320d1a2e0 | |
parent | ea3ce8d7f076e7fecff4be7ae63bc413adb0adf5 (diff) |
adding export to read mailbox status information, RT#15987
-rw-r--r-- | FS/FS/part_export/acct_sql.pm | 2 | ||||
-rw-r--r-- | FS/FS/part_export/acct_sql_status.pm | 3 |
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 |