diff --git a/ChangeLog b/ChangeLog
index ea7ccdb46..6e2ba28ab 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,6 +1,7 @@
 2004-09-24 Richard Frith-Macdonald <rfm@gnu.org>
 
 	* Source/GSArray.m: Make perform methods enumerate forwards.
+	* Source/Additions/GSXML.m: ([nodeAtIndex:]) fix memory leak.
 
 2004-09-22 Richard Frith-Macdonald <rfm@gnu.org>
 
diff --git a/Source/Additions/GSXML.m b/Source/Additions/GSXML.m
index a06aec47d..6abc2ccbf 100644
--- a/Source/Additions/GSXML.m
+++ b/Source/Additions/GSXML.m
@@ -3698,8 +3698,8 @@ fatalErrorFunction(void *ctx, const unsigned char *msg, ...)
       node = xmlXPathNodeSetItem (((xmlXPathObject*)_lib)->nodesetval,
 	(int)index);
       n = [GSXMLNode alloc];
-      
-      return [n _initFrom: node  parent: self];
+      n = [n _initFrom: node  parent: self];
+      return AUTORELEASE(m);
     }
 }
 - (NSString *) description