diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-20 01:27:14 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-20 01:27:14 +0000 |
| commit | 045c1f128ac729dc76c4da7e8ffe34bf12692b94 (patch) | |
| tree | a7254bba507db0094f630e1aa80e8fdcebb78104 /ext/attrs/attrs.xs | |
| parent | 781449de0eec49aa3d5ffc738eb3d41f44325f75 (diff) | |
| parent | f77c86d0713b4b3c1315af23f2108fe7c0059832 (diff) | |
| download | perl-045c1f128ac729dc76c4da7e8ffe34bf12692b94.tar.gz | |
integrate ansi branch to get s/foo/PL_foo/ changes
p4raw-id: //depot/perl@1575
Diffstat (limited to 'ext/attrs/attrs.xs')
| -rw-r--r-- | ext/attrs/attrs.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/attrs/attrs.xs b/ext/attrs/attrs.xs index dae612adaf..bc0df7082b 100644 --- a/ext/attrs/attrs.xs +++ b/ext/attrs/attrs.xs @@ -24,7 +24,7 @@ char * Class int i; CV *cv; PPCODE: - if (!compcv || !(cv = CvOUTSIDE(compcv))) + if (!PL_compcv || !(cv = CvOUTSIDE(PL_compcv))) croak("can't set attributes outside a subroutine scope"); for (i = 1; i < items; i++) { char *attr = SvPV(ST(i), na); |