projects
/
p5sagit/p5-mst-13.2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
implement C<goto &func> and other fixes (via private mail)
[p5sagit/p5-mst-13.2.git]
/
doop.c
diff --git
a/doop.c
b/doop.c
index
7ed895d
..
c988bff
100644
(file)
--- a/
doop.c
+++ b/
doop.c
@@
-1061,7
+1061,7
@@
do_kv(ARGSproto)
RETURN;
}
- if (!SvRMAGICAL(keys) || !mg_find((SV*)keys,'P'))
+ if (! SvTIED_mg((SV*)keys, 'P'))
i = HvKEYS(keys);
else {
i = 0;