diff --git a/ChangeLog b/ChangeLog
index 20ef4b9fd..be5e26a20 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2002-01-28  Francesco Zappa Nardelli  <Francesco.Zappa.Nardelli@ens.fr>
+
+	* src/pcf/pcfdriver.c (PCF_Done_Face): Fix incorrect destruction of
+	the face object (face->toc.tables, face->root.family_name,
+	face->root.available_size, face->charset_encoding,
+	face->charset_registry are now freed).  Thanks to Niels Moseley.
+
 2002-01-28  Roberto Alameda  <ojancano@geekmail.de>
 
 	* src/type1/t1load.c (parse_encoding): Set `loader->num_chars'.
diff --git a/src/pcf/pcfdriver.c b/src/pcf/pcfdriver.c
index 34cc1c30b..2b3ab49b3 100644
--- a/src/pcf/pcfdriver.c
+++ b/src/pcf/pcfdriver.c
@@ -66,6 +66,11 @@ THE SOFTWARE.
         FREE( tmp->value );
     }
     FREE( face->properties );
+    FREE( face->toc.tables );
+    FREE( face->root.family_name );
+    FREE( face->root.available_sizes );
+    FREE( face->charset_encoding );
+    FREE( face->charset_registry );
 
     FT_TRACE4(( "DONE_FACE!!!\n" ));