Commit 2955c11f authored by Fred Drake's avatar Fred Drake

New solution to the "Someone stuck a colon in that filename!" problem:

Allow colons in the labels used for internal references, but do not
expose them when generating filename.
parent 659b98d5
...@@ -10,9 +10,16 @@ require "labels.pl"; ...@@ -10,9 +10,16 @@ require "labels.pl";
my $key; my $key;
# sort so that we get a consistent assignment for nodes with multiple labels # sort so that we get a consistent assignment for nodes with multiple labels
foreach $label (sort keys %external_labels) { foreach $label (sort keys %external_labels) {
$key = $external_labels{$label}; #
$key =~ s|^/||; # If the label can't be used as a filename on non-Unix platforms,
$nodes{$key} = $label; # skip it. Such labels may be used internally within the documentation,
# but will never be used for filename generation.
#
if ($label =~ /^([-.a-zA-Z0-9]+)$/) {
$key = $external_labels{$label};
$key =~ s|^/||;
$nodes{$key} = $label;
}
} }
# This adds the "internal" labels added for indexing. These labels will not # This adds the "internal" labels added for indexing. These labels will not
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment