From: ivan Date: Wed, 11 Aug 2010 00:08:41 +0000 (+0000) Subject: fix return address in welcome letters, RT#9497 X-Git-Tag: TORRUS_1_0_9~414 X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=ff8aa9f859273dd5fbbed2ee80ebc63caa27ea32;hp=197b6a447eb3a09973c2e2e45c4d4e2be8297b17 fix return address in welcome letters, RT#9497 --- diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index e107e6c91..3bfccfc66 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -8988,8 +8988,13 @@ sub generate_letter { $letter_data{returnaddress} = $retadd; } elsif ( grep /\S/, $conf->config('company_address', $self->agentnum) ) { $letter_data{returnaddress} = - join( '\\*'."\n", map s/( {2,})/'~' x length($1)/eg, - $conf->config('company_address', $self->agentnum) + join( "\n", map { s/( {2,})/'~' x length($1)/eg; + s/$/\\\\\*/; + $_; + } + ( $conf->config('company_name', $self->agentnum), + $conf->config('company_address', $self->agentnum), + ) ); } else { $letter_data{returnaddress} = '~';