diff --git a/ChangeLog b/ChangeLog
index ff45495..a67f619 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+2005-02-10  Keith Packard  <keithp@keithp.com>
+
+	reviewed by: pborelli@katamail.com
+
+	* src/fcdir.c: (FcFileScanConfig):
+	Free patterns from fonts which are rejected by configuration
+	(bug #2518)
+
 2005-01-28  Keith Packard  <keithp@keithp.com>
 
 	* README:
diff --git a/src/fcdir.c b/src/fcdir.c
index 8f7738d..974886d 100644
--- a/src/fcdir.c
+++ b/src/fcdir.c
@@ -150,6 +150,8 @@ FcFileScanConfig (FcFontSet	*set,
 		ret = FcFalse;
 	    }
 	}
+	else if (font)
+	    FcPatternDestroy (font);
 	id++;
     } while (font && ret && id < count);
     return ret;