Adjusted to work with the newer version of LaTeX2HTML as well.

diff --git a/Doc/node2label.pl b/Doc/node2label.pl
index 1d643dbb49077efc9f4b6a58f7df655422012961..73a3809a1da8bc04fcf726c0bb6a54fdc956d1df 100755 (executable)
--- a/Doc/node2label.pl
+++ b/Doc/node2label.pl
@@ -4,9 +4,12 @@
 require "labels.pl";
 
 %nodes = ();
+my $key;
 # sort so that we get a consistent assignment for nodes with multiple labels 
 foreach $label (sort keys %external_labels) {
-  $nodes{$external_labels{$label}} = $label;
+  $key = $external_labels{$label};
+  $key =~ s|^/||;
+  $nodes{$key} = $label;
 }
 
 # collect labels that have been used

diff --git a/Doc/tools/node2label.pl b/Doc/tools/node2label.pl
index 1d643dbb49077efc9f4b6a58f7df655422012961..73a3809a1da8bc04fcf726c0bb6a54fdc956d1df 100755 (executable)
--- a/Doc/tools/node2label.pl
+++ b/Doc/tools/node2label.pl
@@ -4,9 +4,12 @@
 require "labels.pl";
 
 %nodes = ();
+my $key;
 # sort so that we get a consistent assignment for nodes with multiple labels 
 foreach $label (sort keys %external_labels) {
-  $nodes{$external_labels{$label}} = $label;
+  $key = $external_labels{$label};
+  $key =~ s|^/||;
+  $nodes{$key} = $label;
 }
 
 # collect labels that have been used