get_chapter_id(): Separate two aspects of string replacement to allow the

need for each to vary independently.
This commit is contained in:
Fred Drake 1998-08-04 22:07:18 +00:00
parent f54556efae
commit 45f2601cf3

View File

@ -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;
}