From 3fc84d6d211b0a150b0553bd68f8661a66c0430a Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Tue, 13 May 2003 05:20:56 +0000 Subject: [PATCH] Better be explicit with dangling elses. p4raw-id: //depot/perl@19507 --- pp.c | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/pp.c b/pp.c index bcf1633..ef8a37d 100644 --- a/pp.c +++ b/pp.c @@ -594,11 +594,12 @@ PP(pp_gelem) sv = newSVpvn(GvNAME(gv), GvNAMELEN(gv)); break; case 'P': - if (strEQ(elem, "PACKAGE")) - if (HvNAME(GvSTASH(gv))) - sv = newSVpv(HvNAME(GvSTASH(gv)), 0); - else - sv = newSVpv("__ANON__",0); + if (strEQ(elem, "PACKAGE")) { + if (HvNAME(GvSTASH(gv))) + sv = newSVpv(HvNAME(GvSTASH(gv)), 0); + else + sv = newSVpv("__ANON__",0); + } break; case 'S': if (strEQ(elem, "SCALAR")) -- 2.7.4