summaryrefslogtreecommitdiff
path: root/gv.c
diff options
context:
space:
mode:
authorIlya Zakharevich <ilya@math.berkeley.edu>1999-07-05 14:24:19 -0400
committerGurusamy Sarathy <gsar@cpan.org>1999-07-07 18:41:07 +0000
commitfe7ac86adc7dbfe34590b2596930effe07cb024b (patch)
treee53ba1c9bdb9b34c50b2a7aa0230350d216474c1 /gv.c
parente50990e1101efe5e60cb533da47cd00524dea150 (diff)
downloadperl-fe7ac86adc7dbfe34590b2596930effe07cb024b.tar.gz
Re: [ID 19990705.001] Overloading boolean conversion
Message-Id: <199907052224.SAA10454@monk.mps.ohio-state.edu> p4raw-id: //depot/perl@3652
Diffstat (limited to 'gv.c')
-rw-r--r--gv.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gv.c b/gv.c
index d1cf7ae62a..9fcf55b550 100644
--- a/gv.c
+++ b/gv.c
@@ -1466,7 +1466,7 @@ Perl_amagic_call(pTHX_ SV *left, SV *right, int method, int flags)
case dec_amg:
SvSetSV(left,res); return left;
case not_amg:
- ans=!SvOK(res); break;
+ ans=!SvTRUE(res); break;
}
return boolSV(ans);
} else if (method==copy_amg) {