[freeside-commits] freeside/rt/lib/RT Transaction_Overlay.pm, 1.1.1.9, 1.2

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/rt/lib/RT
In directory wavetail.420.am:/tmp/cvs-serv31055/lib/RT

Modified Files:
	Transaction_Overlay.pm 
Log Message:
slightly improve terrible quoting behavior when you change MessageBoxWidth

Index: Transaction_Overlay.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/rt/lib/RT/Transaction_Overlay.pm,v
retrieving revision 1.1.1.9
retrieving revision 1.2
diff -u -d -r1.1.1.9 -r1.2
--- Transaction_Overlay.pm	2 Mar 2008 04:08:32 -0000	1.1.1.9
+++ Transaction_Overlay.pm	20 Jul 2009 04:40:41 -0000	1.2
@@ -276,7 +276,7 @@
 returns undef.
 
 Takes a paramhash.  If the $args{'Quote'} parameter is set, wraps this message 
-at $args{'Wrap'}.  $args{'Wrap'} defaults to 70.
+at $args{'Wrap'}.  $args{'Wrap'} defaults to $RT::MessageBoxWidth - 2 or 70.
 
 If $args{'Type'} is set to C<text/html>, plain texts are upgraded to HTML.
 Otherwise, HTML texts are downgraded to plain text.  If $args{'Type'} is
@@ -290,6 +290,7 @@
         Type  => $PreferredContentType,
         Quote => 0,
         Wrap  => 70,
+        Wrap  => ( $RT::MessageBoxWidth || 72 ) - 2,
         @_
     );
 
@@ -335,7 +336,7 @@
             $max = length if ( length > $max );
         }
 
-        if ( $max > 76 ) {
+        if ( $max > $args{'Wrap'}+6 ) { # 76 ) {
             require Text::Wrapper;
             my $wrapper = new Text::Wrapper(
                 columns    => $args{'Wrap'},