t* hacker news on gopher URI git clone git://git.codevoid.de/hn-gopher DIR Log DIR Files DIR Refs --- DIR commit 6533286bc1276e7584436c98fa4f88251da82bf9 DIR parent d93b0ad18f02983bb67885550fa8258095545a34 URI Author: Stefan Hagen <sh+git[at]codevoid[dot]de> Date: Mon, 30 Jul 2018 16:08:15 +0200 Add level bar | to the side of comments Diffstat: M hn-scraper.pl | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) --- DIR diff --git a/hn-scraper.pl b/hn-scraper.pl t@@ -127,11 +127,11 @@ sub formatContent { # shorten links my $short = $linkitem->{href}; - my $l = 63 - length($pad); + my $l = 62 - length($pad); if(length($short) > $l) { $short = substr($short,0,$l)."..."; } # add link to output scalar - $links .= sprintf("[h|${pad}[%i]: %s|URL:%s|codevoid.de|70]\n", $c, $short, $linkitem->{href}); + $links .= sprintf("[h|${pad}\\|[%i]: %s|URL:%s|codevoid.de|70]\n", $c, $short, $linkitem->{href}); } } t@@ -143,12 +143,12 @@ sub formatContent { $content_clean =~ s/\n\n(\n)*/\n\n/g; # Add padding to the left - $content_clean =~ s/^/$pad/g; - $content_clean =~ s/\n/\n$pad/g; + $content_clean =~ s/^/$pad\|/g; + $content_clean =~ s/\n/\n$pad\|/g; # print links if there were any. if($links) { - $content_clean .= "\n\n$links"; + $content_clean .= "\n$pad\|\n$links"; } else { $content_clean .= "\n"; }