From: Fred Drake <fdrake@acm.org>
Date: Mon, 8 Dec 1997 20:58:13 +0000 (+0000)
Subject: Added Emacs turd so this file has the correct mode in Emacs / X/Emacs.
X-Git-Tag: v1.5b2~63
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=a5a3cdcf4df6332c2885231a8265b8e88f3e0622;p=python

Added Emacs turd so this file has the correct mode in Emacs / X/Emacs.

clean_key():  Override the standard LaTeX2HTML clean_key() to remove a
	leading HTML tag, if present.  This broke the indexes for the library
	reference (at least) since many of the strings began with <code> or
	something similar.
---

diff --git a/Doc/.latex2html-init b/Doc/.latex2html-init
index 9696293569..876d728950 100644
--- a/Doc/.latex2html-init
+++ b/Doc/.latex2html-init
@@ -1,4 +1,4 @@
-#LaTeX2HTML Version 96.1 : dot.latex2html-init
+#LaTeX2HTML Version 96.1 : dot.latex2html-init		-*- perl -*-
 #
 
 $INFO = 1;              # 0 = do not make a "About this document..." section 
@@ -196,4 +196,15 @@ sub add_idx {
 }
 
 
+# need to remove leading <...>
+sub clean_key {
+    local ($_) = @_;
+    tr/A-Z/a-z/;
+    s/\s//;
+    s/\#\#\#\d+$//o;  		# Remove the unique id
+    s/^<[a-z][-._a-z0-9]*>//;	# Remove leading <gi>
+    $_
+}
+
+
 1;	# This must be the last line