* font.c (font_delete_unmatched): Now static.

diff --git a/src/ChangeLog b/src/ChangeLog
index ba1bd03..63e2374 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -3,6 +3,7 @@
        * font.c (font_unparse_xlfd): Don't mix pointers to variables with
        pointers to constants.
        (font_parse_fcname): Remove unused vars.
+       (font_delete_unmatched): Now static.
 
        * fns.c (require_nesting_list, require_unwind): Now static.
        (Ffillarray): Rename locals to avoid shadowing.

diff --git a/src/font.c b/src/font.c
index 1681225..25e2968 100644 (file)
--- a/src/font.c
+++ b/src/font.c
@@ -2600,7 +2600,7 @@ static Lisp_Object scratch_font_spec, scratch_font_prefer;
      (2) doesn't match with any regexps in Vface_ignored_fonts (if non-nil).
 */
 
-Lisp_Object
+static Lisp_Object
 font_delete_unmatched (Lisp_Object vec, Lisp_Object spec, int size)
 {
   Lisp_Object entity, val;