1 files changed, 2 insertions, 1 deletions

diff --git a/src/xfont.c b/src/xfont.c
index b73596ce7ce..85fccf0dafd 100644
--- a/src/xfont.c
+++ b/src/xfont.c
@@ -505,7 +505,8 @@ xfont_list (struct frame *f, Lisp_Object spec)
       Lisp_Object alter;
 
       if ((alter = Fassoc (SYMBOL_NAME (registry),
-                           Vface_alternative_font_registry_alist),
+                           Vface_alternative_font_registry_alist,
+                           Qnil),
            CONSP (alter)))
         {
           /* Pointer to REGISTRY-ENCODING field.  */