should fix wrapping of CDRs reported under IEq, RT#9964

diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm
index d364ac5..d9c2c40 100644 (file)
--- a/FS/FS/cust_bill.pm
+++ b/FS/FS/cust_bill.pm
@@ -2291,7 +2291,7 @@ sub print_generic {
   my $nbsp = $nbsps{$format};
 
   my %escape_functions = ( 'latex'    => \&_latex_escape,
-                           'html'     => \&encode_entities,
+                           'html'     => \&_html_escape, #\&encode_entities,
                            'template' => sub { shift },
                          );
   my $escape_function = $escape_functions{$format};
@@ -3165,6 +3165,14 @@ sub _latex_escape {
   $value;
 }
 
+
+sub _html_escape {
+  my $value = shift;
+  encode_entities($value);
+  $value =~ s/ +/ /g;
+  $value;
+}
+
 #utility methods for print_*
 
 sub _translate_old_latex_format {