X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/141f0dc206b7f54b29627b91484782643bd08ec6..0083d6fee99e70519ff4770a4f76f02b6937537d:/sc.plp diff --git a/sc.plp b/sc.plp index cd07f24..31d3555 100644 --- a/sc.plp +++ b/sc.plp @@ -154,7 +154,6 @@ sub coltoggle { speed specials - <: sub showrange { my ($row, @elements) = @_; @@ -254,7 +253,7 @@ sub showrange { my ($race, $cat) = ('', ''); for (@rows) { $race = $_->{race}, - printf '

%s

'."\n", $race, ucfirst $race + printf '

%s

'."\n", $race, ucfirst $race if $grouped and $race ne $_->{race}; $_->{cat} = $_->{race} if not $grouped; my $sizechar = [qw/? s m l/]->[$_->{size}]; @@ -307,7 +306,6 @@ sub showrange { } } :> -