From: ivan Date: Tue, 1 Nov 2005 05:32:56 +0000 (+0000) Subject: yarg X-Git-Tag: BEFORE_FINAL_MASONIZE~330 X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=c01186e8877f8985e652af77ce88e18bd516fa91 yarg --- diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm index c1724afe6..4424797c1 100644 --- a/FS/FS/cust_bill.pm +++ b/FS/FS/cust_bill.pm @@ -836,7 +836,7 @@ sub spool_csv { my($self, %opt) = @_; if ( $opt{'dest'} ) { - my %invoicing_list = map { /^(POST|FAX)$/ or $1 = 'EMAIL'; $1 => 1 } + my %invoicing_list = map { /^(POST|FAX)$/ or 'EMAIL' =~ /^(.*)$/; $1 => 1 } $self->cust_main->invoicing_list; return unless $invoicing_list{$opt{'dest'}}; }