VMS-specific nit in S_init_perllib after 2cace6acdfad87b2d298bff18b91b339c18fd1e3.

diff --git a/perl.c b/perl.c
index 7f98351..684fd80 100644 (file)
--- 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 */
     }