From: Craig A. Berry <craigberry@mac.com>
Date: Mon, 23 Feb 2009 03:14:17 +0000 (-0600)
Subject: VMS-specific nit in S_init_perllib after 2cace6acdfad87b2d298bff18b91b339c18fd1e3.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f05b5874edd1526b5a2b557cc1ffb6ad7552b85d;p=p5sagit%2Fp5-mst-13.2.git

VMS-specific nit in S_init_perllib after 2cace6acdfad87b2d298bff18b91b339c18fd1e3.
---

diff --git a/perl.c b/perl.c
index 7f98351..684fd80 100644
--- a/perl.c
+++ b/perl.c
@@ -4133,9 +4133,10 @@ S_init_perllib(pTHX)
 	    do {
 		incpush_use_sep(buf, 0, INCPUSH_ADD_SUB_DIRS);
 	    } while (my_trnlnm("PERL5LIB",buf,++idx));
-	else if
+	else {
 	    while (my_trnlnm("PERLLIB",buf,idx++))
 		incpush_use_sep(buf, 0, 0);
+	}
 #endif /* VMS */
     }