[Bast-commits] r9171 - ironman/branches/mk-ii/Perlanet-IronMan/lib/Perlanet

[aCiD2 at dev.catalyst.perl.org]

Author: aCiD2
Date: 2010-04-14 23:00:23 +0100 (Wed, 14 Apr 2010)
New Revision: 9171

Modified:
   ironman/branches/mk-ii/Perlanet-IronMan/lib/Perlanet/IronMan.pm
Log:
Specify the length of truncation

Modified: ironman/branches/mk-ii/Perlanet-IronMan/lib/Perlanet/IronMan.pm
===================================================================
--- ironman/branches/mk-ii/Perlanet-IronMan/lib/Perlanet/IronMan.pm	2010-04-14 21:59:54 UTC (rev 9170)
+++ ironman/branches/mk-ii/Perlanet-IronMan/lib/Perlanet/IronMan.pm	2010-04-14 22:00:23 UTC (rev 9171)
@@ -233,7 +233,7 @@
 sub _build_truncator {
     my $self = shift;
     my $html_truncate = HTML::Truncate->new(repair=>1);
-    $html_truncate->chars($ length);
+    $html_truncate->chars(250);
     $html_truncate->ellipsis(" [...]");
 
     return $html_truncate;