summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorArtur Bergman <sky@nanisky.com>2001-06-26 18:18:40 +0200
committerJarkko Hietaniemi <jhi@iki.fi>2001-06-26 13:31:57 +0000
commitc8a3bf85b4f54d1a649a56a937fd48a38f8982fe (patch)
tree3a728ff5c9ab41f92c2243c12c17fc99fab0963e /toke.c
parente14f2162147f3d6538376ec4348c4ead50ca2bae (diff)
downloadperl-c8a3bf85b4f54d1a649a56a937fd48a38f8982fe.tar.gz
[PATH] shared -> unique;
Message-ID: <002001c0fe4a$e623ba30$21000a0a@vogw2kdev> Because "shared" isn't: it's read-only. p4raw-id: //depot/perl@10959
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/toke.c b/toke.c
index 76be79bfe6..e177cefeaf 100644
--- a/toke.c
+++ b/toke.c
@@ -3091,7 +3091,7 @@ Perl_yylex(pTHX)
else if (!PL_in_my && len == 6 && strnEQ(s, "method", len))
CvMETHOD_on(PL_compcv);
#ifdef USE_ITHREADS
- else if (PL_in_my == KEY_our && len == 6 && strnEQ(s, "shared", len))
+ else if (PL_in_my == KEY_our && len == 6 && strnEQ(s, "unique", len))
GvSHARED_on(cGVOPx_gv(yylval.opval));
#endif
/* After we've set the flags, it could be argued that