[Python-checkins] python/dist/src/Doc/perl python.perl,1.150,1.151

[fdrake at users.sourceforge.net]

Update of /cvsroot/python/python/dist/src/Doc/perl
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20031/perl

Modified Files:
	python.perl 
Log Message:
fix markup in "title" attribute for \citetitle{}
(closes SF patch #1054715; backporting to release23-maint branch)


Index: python.perl
===================================================================
RCS file: /cvsroot/python/python/dist/src/Doc/perl/python.perl,v
retrieving revision 1.150
retrieving revision 1.151
diff -u -d -r1.150 -r1.151
--- python.perl	29 Oct 2004 19:47:52 -0000	1.150
+++ python.perl	4 Nov 2004 03:23:04 -0000	1.151
@@ -389,9 +389,10 @@
     my $icon = get_link_icon($url);
     my $repl = '';
     if ($url) {
+        my $titletext = strip_html_markup("$title");
         $repl = ("<em class=\"citetitle\"><a\n"
                  . " href=\"$url\"\n"
-                 . " title=\"$title\"\n"
+                 . " title=\"$titletext\"\n"
                  . " >$title$icon</a></em>");
     }
     else {