1 files changed, 1 insertions, 1 deletions

diff --git a/src/xfns.c b/src/xfns.c
index ade94e129be..4083ec74be0 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -1757,7 +1757,7 @@ be shared by the new frame.")
     BLOCK_INPUT;
     /* First, try whatever font the caller has specified.  */
     if (STRINGP (font))
-      font = x_new_font (f, XSTRING (tem)->data);
+      font = x_new_font (f, XSTRING (font)->data);
     /* Try out a font which we hope has bold and italic variations.  */
     if (!STRINGP (font))
       font = x_new_font (f, "-misc-fixed-medium-r-normal-*-*-120-*-*-c-*-iso8859-1");