From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Tue, 13 May 2003 05:20:56 +0000 (+0000)
Subject: Better be explicit with dangling elses.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=3fc84d6d211b0a150b0553bd68f8661a66c0430a;p=p5sagit%2Fp5-mst-13.2.git

Better be explicit with dangling elses.

p4raw-id: //depot/perl@19507
---

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"))