diff --git a/README.md b/README.md
index b279a59f40cf1e2111bc0add9c4e6af9a0f2cef6..d56288ac5f5e3b0666701ae469af8a26d70a3a91 100644
--- a/README.md
+++ b/README.md
@@ -11,6 +11,7 @@
- load an atom/rss feed from http(s) given by user input
- render feed (channel info & entrys) as a gemini site
- include links to originating site and every article
+ - strip html tags from item description
Fetching feeds from gemini is currently not supported -> https://todo.sr.ht/~rwa/gmni-perl/4
diff --git a/orrg.pl b/orrg.pl
index d21f98206246374db29b773d525395ee92057928..98f881144d82da535611babc888eae9ed458c221 100755
--- a/orrg.pl
+++ b/orrg.pl
@@ -72,6 +72,7 @@ $feed->image eq '' or push @body, '=> '. $feed->image .' feed image';
$feed->link eq '' or push @body, ('=> '.$feed->link.' open website', '');
push @body, ('## recent feed items', '');
+ my $hs = HTML::Strip->new(emit_spaces => 0, auto_reset => 1);
foreach my $it ($feed->get_item()) {
push @body, '### '. $it->title;
if ($it->pubDate ne '') {
@@ -80,8 +81,9 @@ push @body, 'published '. strftime('%Y-%m-%dT%H:%M:%SZ', gmtime($dt->epoch));
}
push @body, '';
if ($it->description ne '') {
- my $hs = HTML::Strip->new();
- push @body, $hs->parse($it->description);
+ my $desc = $it->description;
+ $desc =~ s/\<li\>/* /ig;
+ push @body, $hs->parse($desc);
}
$it->link eq '' or push @body, ('=> '.$it->link.' open entry in browser', '');
}