X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/2876b76b7b654f43dd1668c4a963a049450ed66c..53ac47862f4b40c1088c5eaf360fa0ddee110634:/Shiar_Sheet/FormatChar.pm
diff --git a/Shiar_Sheet/FormatChar.pm b/Shiar_Sheet/FormatChar.pm
index ee0c310..834b71b 100644
--- a/Shiar_Sheet/FormatChar.pm
+++ b/Shiar_Sheet/FormatChar.pm
@@ -181,10 +181,12 @@ sub cell {
}
}
- return sprintf('
%s%s',
- defined $title ? qq{ title="$title"} : '',
- @class ? sprintf(' class="%s"', join ' ', @class) : '',
- $html || '',
+ return sprintf('<%s>%s%s',
+ join(' ', 'td',
+ defined $title ? qq{ title="$title"} : (),
+ @class ? sprintf('class="%s"', join ' ', @class) : (),
+ $html || (),
+ ),
$cell eq '' ? ' ' : $cell,
$anno,
);
@@ -225,9 +227,13 @@ sub table {
$colspan++;
next;
}
+ elsif ($cell eq '>-') {
+ $rows[-1] .= ' | ';
+ next;
+ }
$rows[-1] .= $self->cell($cell,
- $colspan > 1 && qq{ colspan="$colspan"},
+ $colspan > 1 && qq{colspan="$colspan"},
);
$colspan = 1;
|