diff --git a/ChangeLog b/ChangeLog
index c087dce9b3..e6e8342388 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Wed Sep 26 19:02:39 2001  Guy Decoux  <ts@moulon.inra.fr>
+
+	* parse.y: allow 'primary[] = arg'
+
 Tue Sep 25 10:46:42 2001  Usaku Nakamura  <usa@ruby-lang.org>
 
 	* win32/win32.c (isInternalCmd): check return value of NtMakeCmdVector
diff --git a/parse.y b/parse.y
index 2816976a2b..8da2f7f555 100644
--- a/parse.y
+++ b/parse.y
@@ -717,7 +717,7 @@ arg		: lhs '=' arg
 		    {
 			NODE *args = NEW_LIST($6);
 
-			list_append($3, NEW_NIL());
+			$3 = list_append($3, NEW_NIL());
 			list_concat(args, $3);
 			if ($5 == tOROP) {
 			    $5 = 0;