(xfont_list_pattern): Free names returned from XListFonts.

diff --git a/src/xfont.c b/src/xfont.c
index 8483ae50792a67471205cdc129aaccc8f06fbc8f..f84312413ca48c53b0cc9d5fff33ae94e3b8b4b9 100644 (file)
--- a/src/xfont.c
+++ b/src/xfont.c
@@ -290,6 +290,7 @@ xfont_list_pattern (frame, display, pattern)
                  || XINT (AREF (entity, FONT_AVGWIDTH_INDEX)) > 0))
            list = Fcons (entity, list);
        }
+      XFreeFontNames (names);
     }
 
   x_uncatch_errors ();