summaryrefslogtreecommitdiffstats
path: root/Doc/perl
diff options
context:
space:
mode:
authorFred Drake <fdrake@acm.org>1999-03-04 18:41:17 (GMT)
committerFred Drake <fdrake@acm.org>1999-03-04 18:41:17 (GMT)
commit62cc360e3811cae8647ae3c663a8605271c4a9dc (patch)
tree827794614e9b0ac6c1afd2865d64c6dd0b25f687 /Doc/perl
parent35c3ffdc3f622719585532f291d8f2366be55235 (diff)
downloadcpython-62cc360e3811cae8647ae3c663a8605271c4a9dc.zip
cpython-62cc360e3811cae8647ae3c663a8605271c4a9dc.tar.gz
cpython-62cc360e3811cae8647ae3c663a8605271c4a9dc.tar.bz2
add_module_idx(): If \ignorePlatformAnnotation is used, only ignore
the specified annotation, not any annotation.
Diffstat (limited to 'Doc/perl')
-rw-r--r--Doc/perl/l2hinit.perl2
1 files changed, 1 insertions, 1 deletions
diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl
index bc2e318..e247c1b 100644
--- a/Doc/perl/l2hinit.perl
+++ b/Doc/perl/l2hinit.perl
@@ -284,7 +284,7 @@ sub add_module_idx{
$key =~ s/<tt>([a-zA-Z0-9._]*)<\/tt>/\1/;
my $plat = "$ModulePlatforms{$key}";
$plat = ''
- if $IGNORE_PLATFORM_ANNOTATION;
+ if ($plat eq $IGNORE_PLATFORM_ANNOTATION);
if (!$first) {
$allthesame = 0
if ($prevplat ne $plat);