Commit f015d9a5 authored by Fred Drake's avatar Fred Drake

Give the pattern used to pick out a source anchor a more specific pattern.

parent 5962eb0d
......@@ -39,7 +39,7 @@ foreach $label (keys %internal_labels) {
while (<>) {
# don't want to do one s/// per line per node
# so look for lines with hrefs, then do s/// on nodes present
if (/(HREF|href)=[\"\']([^\#\"\']*)html[\#\"\']/) {
if (/(HREF|href)=[\"\']node\d+\.html[\#\"\']/) {
@parts = split(/(HREF|href)\=[\"\']/);
shift @parts;
for $node (@parts) {
......
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