From: Fred Drake <fdrake@acm.org>
Date: Tue, 4 Aug 1998 22:07:18 +0000 (+0000)
Subject: get_chapter_id():  Separate two aspects of string replacement to allow the
X-Git-Tag: v1.5.2a1~153
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=45f2601cf38b11647df3a3dd45465d4c57c77dfc;p=thirdparty%2FPython%2Fcpython.git

get_chapter_id():  Separate two aspects of string replacement to allow the
	need for each to vary independently.
---

diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl
index ac1b6278a72a..f2a319e9bfe8 100644
--- a/Doc/perl/python.perl
+++ b/Doc/perl/python.perl
@@ -883,7 +883,8 @@ require SynopsisTable;
 
 sub get_chapter_id(){
     my $id = do_cmd_thechapter('');
-    $id =~ s/<SPAN CLASS="arabic">(\d+)<\/SPAN>\./\1/;
+    $id =~ s/<SPAN CLASS="arabic">(\d+)<\/SPAN>/\1/;
+    $id =~ s/\.//;
     return $id;
 }