X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=gv.c;h=e20f27890bb95ef9e0c77b4bdbc0bcac97698e23;hb=9277038781ef547cb9d994aebe1ec82e3270d9ac;hp=a461e0dfba0ff8c5e515af4802fd400491964ca2;hpb=7d54d38ea123279986bac06bc420bfdc4e2395fb;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/gv.c b/gv.c
index a461e0d..e20f278 100644
--- a/gv.c
+++ b/gv.c
@@ -1086,7 +1086,7 @@ Perl_gv_fullname4(pTHX_ SV *sv, GV *gv, const char *prefix, bool keepmain)
     char *name;
     HV *hv = GvSTASH(gv);
     if (!hv) {
-	(void)SvOK_off(sv);
+	SvOK_off(sv);
 	return;
     }
     sv_setpv(sv, prefix ? prefix : "");