[svn r5791] Serves me right for not reading the spec

This commit is contained in:
sb476 2004-04-22 13:20:31 +02:00
parent 057227d738
commit 1c06f9271e

View File

@ -117,13 +117,13 @@ sub do_this_line {
$other_number = $_[3];
}
# Generate $linkid which will be kataster no., or other no. if no kataster no. present
my $linkid = $kat_num;
# Generate $linkid which will be kataster no., or other no. if no kataster no. present. Per HTML4 (and XHTML etc.) ID and NAME tokens must begin with alpha characters - hence "id" prepend
my $linkid = "id$kat_num";
my $other_number_no_brackets = $other_number;
if ($kat_num and $other_number) {
$other_number = "($other_number)"; # wrap it in brackets, so it doesn't appear to be official
} elsif ($other_number and ! $kat_num) {
$linkid = $other_number;
$linkid = "id$other_number";
}
# Under XHTML 1.0, link ids must not have '(', '?', ' ', or '/'
$linkid =~ s/\//-/g;