bitlair/revbank
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Pad differently

Browse source 
Experimental code (never committed) had ANSI escape sequences there, and
required manual padding. Those were gone, but I forgot to change the
manual padding into normal sprintf padding.

This also makes it explicit that the left alignment is actually intended
here. (Actually looks better here.)
This commit is contained in:
Juerd Waalboer 2023-01-30 05:04:38 +01:00
parent a555c1ddf1
commit 416c722511
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lib/RevBank/Cart/Entry.pm
View file

@ -106,9 +106,9 @@ sub as_printable($self) {
# numbers. Here, the implied sign is "-", and a "+" is only added for
# positive numbers.
my $q = $self->{quantity};
push @s, sprintf "%s%s%s" . "%s%6s%s" . " " . "%s%s%s",
push @s, sprintf "%s%-4s%s" . "%s%6s%s" . " " . "%s%s%s",
($self->{highlight} || $self->{highlight_quantity} ? $HI : $LO),
($q > 1 || $self->{highlight_quantity} ? "${q}x" . " " x (3 - length $q) : " " x 4),
($q > 1 || $self->{highlight_quantity} ? "${q}x" : ""),
($self->{highlight} ? "" : $END),
($self->{highlight} || $self->{highlight_amount} ? $HI : $LO),