default to a session cookie instead of setting an explicit timeout, weird timezone...

[freeside.git] / FS / FS / part_event / Action / cust_bill_send_csv_ftp.pm

diff --git a/FS/FS/part_event/Action/cust_bill_send_csv_ftp.pm b/FS/FS/part_event/Action/cust_bill_send_csv_ftp.pm
index db3554e..9db8e02 100644 (file)
--- a/FS/FS/part_event/Action/cust_bill_send_csv_ftp.pm
+++ b/FS/FS/part_event/Action/cust_bill_send_csv_ftp.pm
@@ -2,14 +2,14 @@ package FS::part_event::Action::cust_bill_send_csv_ftp;
 
 use strict;
 use base qw( FS::part_event::Action );
+use FS::Misc::Invoicing qw( spool_formats );
 
-sub description {
-  'Upload CSV invoice data to an FTP server';
-}
+sub description { 'Upload CSV invoice data to an FTP server'; }
 
-sub deprecated {
-  1;
-}
+sub deprecated { 1; }
+
+## declaring that this action will send out an invoice
+sub will_send_invoice { 1; }
 
 sub eventtable_hashref {
   { 'cust_bill' => 1 };
@@ -19,10 +19,7 @@ sub option_fields {
   (
     'ftpformat'   => { label   => 'Format',
                        type    =>'select',
-                       options => ['default', 'billco'],
-                       option_labels => { 'default' => 'Default',
-                                          'billco'  => 'Billco',
-                                        },
+                       options => [ spool_formats() ],
                      },
     'ftpserver'   => 'FTP server',
     'ftpusername' => 'FTP username',
@@ -31,9 +28,7 @@ sub option_fields {
   );
 }
 
-sub default_weight {
-  50;
-}
+sub default_weight { 50; }
 
 sub do_action {
   my( $self, $cust_bill ) = @_;