projects
/
p5sagit/p5-mst-13.2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
Some signals are more real than others
[p5sagit/p5-mst-13.2.git]
/
universal.c
diff --git
a/universal.c
b/universal.c
index
507ab14
..
4506f77
100644
(file)
--- a/
universal.c
+++ b/
universal.c
@@
-338,7
+338,7
@@
XS(XS_UNIVERSAL_VERSION)
gvp = pkg ? (GV**)hv_fetch(pkg,"VERSION",7,FALSE) : Null(GV**);
- if (gvp && isGV(gv = *gvp) && SvOK(sv = GvSV(gv))) {
+ if (gvp && isGV(gv = *gvp) && (sv = GvSV(gv)) && SvOK(sv)) {
SV *nsv = sv_newmortal();
sv_setsv(nsv, sv);
sv = nsv;