From ed306292d68fe8ca3fb48f31129fe68229741519 Mon Sep 17 00:00:00 2001
From: Fred Drake <fdrake@acm.org>
Date: Thu, 4 Nov 2004 03:23:04 +0000
Subject: fix markup in "title" attribute for \citetitle{} (closes SF patch
 #1054715; backporting to release23-maint branch)

---
 Doc/perl/python.perl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl
index c7f2ffb..14ce958 100644
--- a/Doc/perl/python.perl
+++ b/Doc/perl/python.perl
@@ -389,9 +389,10 @@ sub do_cmd_citetitle{
     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 {
-- 
cgit v0.12