diff --git a/ChangeLog b/ChangeLog
index 402d97736..a69e88688 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2007-11-26  Richard Frith-Macdonald <rfm@gnu.org>
+
+	* Source/Additions/GSXML.m: Make check for apple property lists
+	more tolerant.
+
 2007-11-25  Richard Frith-Macdonald <rfm@gnu.org>
 
 	* Headers/Foundation/NSThread.h: Add new methods from MacOS 10.5
diff --git a/Source/Additions/GSXML.m b/Source/Additions/GSXML.m
index d58758d1a..eb54032c4 100644
--- a/Source/Additions/GSXML.m
+++ b/Source/Additions/GSXML.m
@@ -2391,11 +2391,6 @@ static NSString	*endMarker = @"At end of incremental parse";
  */
 #define	HANDLER	((GSSAXHandler*)(((xmlParserCtxtPtr)ctx)->_private))
 
-#ifdef GNUSTEP
-static NSString *applePList
-  = @"file://localhost/System/Library/DTDs/PropertyList.dtd";
-#endif
-
 static xmlParserInputPtr
 loadEntityFunction(void *ctx,
   const unsigned char *eid, const unsigned char *url)
@@ -2440,7 +2435,7 @@ loadEntityFunction(void *ctx,
                             range: NSMakeRange(0, [local length])];
 
 #ifdef GNUSTEP
-  if ([location isEqual: applePList] == YES)
+  if ([location rangeOfString: @"/DTDs/PropertyList"].length > 0)
     {
       file = [location substringFromIndex: 6];
       if ([[NSFileManager defaultManager] fileExistsAtPath: file] == NO)