summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1998-10-06 07:19:39 +0000
committerGurusamy Sarathy <gsar@cpan.org>1998-10-06 07:19:39 +0000
commitfe13a13eeccd4ce7418971a24318fc215b72d5b0 (patch)
tree2486134e928dceaecf5804e2e21da9bbf3065728 /perl.c
parent001fcafeeb8954033cae08e785d6bc955d1b680a (diff)
downloadperl-fe13a13eeccd4ce7418971a24318fc215b72d5b0.tar.gz
fix globals caught by change#1927; builds and tests on Solaris
p4raw-link: @1927 on //depot/perl: eb07465ebe1238598e948058857ec948c6697f86 p4raw-id: //depot/perl@1936
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl.c b/perl.c
index 7433132973..0d6b150e10 100644
--- a/perl.c
+++ b/perl.c
@@ -1766,12 +1766,12 @@ Internet, point your browser at http://www.perl.com/, the Perl Home Page.\n\n");
return s;
case 'W':
PL_dowarn = G_WARN_ALL_ON|G_WARN_ON;
- compiling.cop_warnings = WARN_ALL ;
+ PL_compiling.cop_warnings = WARN_ALL ;
s++;
return s;
case 'X':
PL_dowarn = G_WARN_ALL_OFF;
- compiling.cop_warnings = WARN_NONE ;
+ PL_compiling.cop_warnings = WARN_NONE ;
s++;
return s;
case '*':