diff options
| author | ivan <ivan> | 2004-10-23 10:36:54 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2004-10-23 10:36:54 +0000 |
| commit | 615be84825733a47906497b54005146c84770dd4 (patch) | |
| tree | 3078d72c6377ab181dcc66bc22e07441b55cac6b | |
| parent | 589ac6e8730f2d814bc76d9c2f0482f459cd56b6 (diff) | |
add debug flag
| -rw-r--r-- | FS/FS/part_export/artera_turbo.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/FS/FS/part_export/artera_turbo.pm b/FS/FS/part_export/artera_turbo.pm index 13a4f39a7..af4c79052 100644 --- a/FS/FS/part_export/artera_turbo.pm +++ b/FS/FS/part_export/artera_turbo.pm @@ -22,6 +22,9 @@ tie my %options, 'Tie::IxHash', 'production' => { 'label' => 'Production mode (leave unchecked for staging)', 'type' => 'checkbox', }, + 'debug' => { 'label' => 'Enable debug logging', + 'type' => 'checkbox', + }, ; %info = ( @@ -62,6 +65,7 @@ sub _export_insert { eval "use Net::Artera;"; return $@ if $@; + $Net::Artera::DEBUG = 1 if $self->option('debug'); my $artera = $self->_new_Artera; my $cust_pkg = $svc_external->cust_svc->cust_pkg; @@ -133,6 +137,7 @@ sub statusChange { eval "use Net::Artera;"; return $@ if $@; + $Net::Artera::DEBUG = 1 if $self->option('debug'); my $artera = $self->_new_Artera; my $result = $artera->statusChange( |