Filter::FormatText用パッチ
Filter::FormatTextでリンクを有効にするパッチです。問題なく動きますが、少々問題があるためパッチとして公開します。
切り出す前にリンクを作成しているので、
- aタグ中に切り詰められる場合がある
- 表示している長さと切り出し設定の長さが同じにならない
という問題点があります。
切り出しを行なわず、フォーマット目的の場合であれば問題ないと思われます。
@@ -1,7 +1,7 @@
package Plagger::Plugin::Filter::FormatText; use HTML::TreeBuilder;
-use HTML::FormatText;
+use HTML::FormatText::WithLinks;
use Encode;
use strict;
@@ -26,9 +26,12 @@
my $left = $cfg->{left_margin} || 0;
my $right = $cfg->{right_margin} || 72;
my $tree = HTML::TreeBuilder->new()->parse($entry->body);
- my $formatter = HTML::FormatText->new(
+ my $formatter = HTML::FormatText::WithLinks->new(
leftmargin => $left,
rightmargin => $right,
+ before_link => '<a href="%l">',
+ after_link => '</a>',
+ footnote => '',
);
my $body = $formatter->format($tree);
my $len = length($body);