X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/929c590c28463bc9f80f61250858eec6b4cab747..75b9efa8a00eadba5aa4d4f3cc6c659050ccbf78:/sc.plp diff --git a/sc.plp b/sc.plp index 59ef95c..88459de 100644 --- a/sc.plp +++ b/sc.plp @@ -180,7 +180,10 @@ sub showval { local $_ = $row; $_->{hp} += $_->{shield} if $_->{shield}; my $suitchar = ''; - if ($_->{suit}) { + if ($_->{attr}->{structure}) { + $suitchar = 'b'; + } + elsif ($_->{suit}) { $suitchar = [qw/? s m l/]->[$_->{suit}]; } elsif ($_->{cargo} > 0) {