diff --git a/patchlevel.h b/patchlevel.h
index 058e617..6b73b14 100644
--- a/patchlevel.h
+++ b/patchlevel.h
@@ -25,6 +25,6 @@
    regexp `^#define[ 	]*PATCHLEVEL', since that's what support/mkversion.sh
    looks for to find the patch level (for the sccs version string). */
 
-#define PATCHLEVEL 39
+#define PATCHLEVEL 40
 
 #endif /* _PATCHLEVEL_H_ */
diff --git a/po/._bg.po b/po/._bg.po
deleted file mode 100644
index 8bfb9f7..0000000
Binary files a/po/._bg.po and /dev/null differ
diff --git a/subst.c b/subst.c
index 9e8447a..961750c 100644
--- a/subst.c
+++ b/subst.c
@@ -5782,7 +5782,7 @@ expand_arrayref:
       /* XXX - does this leak if name[@] or name[*]? */
       if (pflags & PF_ASSIGNRHS)
         {
-          temp = array_variable_name (name, &tt, (int *)0);
+          var = array_variable_part (name, &tt, (int *)0);
           if (ALL_ELEMENT_SUB (tt[0]) && tt[1] == ']')
 	    temp = array_value (name, quoted|Q_DOUBLE_QUOTES, 0, &atype, &ind);
 	  else