[Bps-public-commit] r9209 - Text-Quoted

[ruz at bestpractical.com]

Author: ruz
Date: Wed Oct  3 07:04:14 2007
New Revision: 9209

Modified:
   Text-Quoted/   (props changed)
   Text-Quoted/Quoted.pm

Log:
 r18265 at cubic-pc:  cubic | 2007-10-03 14:39:00 +0400
 * $_->{hang} is always an object


Modified: Text-Quoted/Quoted.pm
==============================================================================
--- Text-Quoted/Quoted.pm	(original)
+++ Text-Quoted/Quoted.pm	Wed Oct  3 07:04:14 2007
@@ -227,9 +227,8 @@
 
     # Reapply hangs
     for (@paras) {
-        next unless my $hang = $_->{hang};
-        next unless $hang->stringify;
-        $_->{text} = $hang->stringify . " " . $_->{text};
+        next unless my $str = $_->{hang}->stringify;
+        $_->{text} = $str . " " . $_->{text};
     }
     return @paras;
 }