X-Git-Url: http://git.shiar.net/barcat.git/blobdiff_plain/65c8fa48dbb0d3a3ba0016d761acf99acf964f37..bf066b0f0a9039972705713dce09c0bc5f39e29f:/barcat diff --git a/barcat b/barcat index cdb41da..4cb2cd1 100755 --- a/barcat +++ b/barcat @@ -112,7 +112,7 @@ while (readline) { my $trimpos = abs $opt{trim}; $trimpos -= length $1 if $opt{unmodified}; if ($trimpos <= 1) { - $_ = substr $_, 0, 1; + $_ = substr $_, 0, 2; } elsif (length > $trimpos) { substr($_, $trimpos - 1) = '…';