vms.c: Convert to use av_count()

1 files changed, 2 insertions, 2 deletions

diff --git a/vms/vms.c b/vms/vms.c
index 1c61149e6a..5635450e95 100644
--- a/vms/vms.c
+++ b/vms/vms.c
@@ -12889,7 +12889,7 @@ mod2fname(pTHX_ CV *cv)
   int max_name_len = 39;
   AV *in_array = (AV *)SvRV(ST(0));
 
-  num_entries = av_tindex(in_array);
+  num_entries = av_count(in_array);
 
   /* All the names start with PL_. */
   strcpy(ultimate_name, "PL_");
@@ -12898,7 +12898,7 @@ mod2fname(pTHX_ CV *cv)
   Zero(work_name, sizeof(work_name), char);
 
   /* Run through the entries and build up a working name */
-  for(counter = 0; counter <= num_entries; counter++) {
+  for(counter = 0; counter < num_entries; counter++) {
     /* If it's not the first name then tack on a __ */
     if (counter) {
       my_strlcat(work_name, "__", sizeof(work_name));