From: Craig A. Berry <craigberry@mac.com>
Date: Fri, 8 Sep 2006 02:07:30 +0000 (+0000)
Subject: declaration after code nit in vms/vms.c (from Martin Vorlaender)
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0faef845a8964324cf7fed51ac8fc5dab0096efc;p=p5sagit%2Fp5-mst-13.2.git

declaration after code nit in vms/vms.c (from Martin Vorlaender)

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

diff --git a/vms/vms.c b/vms/vms.c
index dc97685..e4fe676 100644
--- a/vms/vms.c
+++ b/vms/vms.c
@@ -1357,8 +1357,9 @@ prime_env_iter(void)
          */
         char lnm[LNM$C_NAMLENGTH+1];
         char eqv[MAX_DCL_SYMBOL+1];
+        int trnlen;
         strncpy(lnm, key, keylen);
-        int trnlen = vmstrnenv(lnm, eqv, 0, fildev, 0);
+        trnlen = vmstrnenv(lnm, eqv, 0, fildev, 0);
         sv = newSVpvn(eqv, strlen(eqv));
       }
       else {