my $arg = '';
print "<$tag$arg class=\"sy-\l$type\">" if $tag;
if (!$type || $type eq 'Constant'
- and $contents =~ s{^(['"]?)(/?[a-z0-9_.]+\.(?:plp?|css|js))(?=\1$)}{}) {
+ and $contents =~ s{^(['"]?)([/a-z0-9_.-]+\.(?:plp?|css|js))(?=\1$)}{}) {
# link other page sources, stylesheets, and javascript
print $1 . showlink($2, "/source/$2");
}