X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/55c75a0c53862083d5d3c52b6ef6e6efa2864c7e..cad8198dbb4421c31673d233f1f05fdb5e1bffbd:/source.plp?ds=inline diff --git a/source.plp b/source.plp index aad6898..bc8423b 100644 --- a/source.plp +++ b/source.plp @@ -14,18 +14,13 @@ $header{content_type} = "text/html; charset=utf-8";
\n"; foreach (@$parsed) { my $tag = $_->[0] && ($TYPETAG{ $_->[0] } || 'span'); my $arg = ''; - print "<$tag$arg class=\"syn$_->[0]\">" if $tag; + print "<$tag$arg class=\"sy-\l$_->[0]\">" if $tag; if ($_->[0] eq 'Constant' and $_->[1] =~ s/^(')([a-z0-9_.]+\.plp?)(?=\1$)//) { printf '%s%s', $1, "/source/$2", $2; }