Remove trailing whitespace from person names with no description

svn-id: r48642
This commit is contained in:
Ori Avtalion 2010-04-12 19:40:54 +00:00
parent 050aca584b
commit b5612d0cf6
2 changed files with 116 additions and 115 deletions

View file

@ -366,12 +366,13 @@ sub add_person {
my $tab;
if ($mode eq "TEXT") {
my $min_name_width = length $desc > 0 ? $max_name_width : 0;
$name = $nick if $name eq "";
$name = html_entities_to_ascii($name);
$desc = html_entities_to_ascii($desc);
$tab = " " x ($section_level * 2 + 1);
printf $tab."%-".$max_name_width.".".$max_name_width."s", $name;
printf $tab."%-".$min_name_width.".".$max_name_width."s", $name;
# Print desc wrapped
if (length $desc > 0) {