diff --git a/src/gui_photon.c b/src/gui_photon.c
index f2bd5f0..b7c92df 100644
--- a/src/gui_photon.c
+++ b/src/gui_photon.c
@@ -2986,6 +2986,7 @@
 	    vim_free( font_name );
 	    return( FAIL );
 	}
+
 	gui_mch_free_font( gui.norm_font );
 	gui.norm_font = font_tag;
     }
@@ -3046,6 +3047,20 @@
     return( FAIL );
 }
 
+/*
+ * Return the name of font "font" in allocated memory.
+ * Don't know how to get the actual name, thus use the provided name.
+ */
+    char_u *
+gui_mch_get_fontname(font, name)
+    GuiFont font;
+    char_u  *name;
+{
+    if (name == NULL)
+	return NULL;
+    return vim_strsave(name);
+}
+
     void
 gui_mch_set_font(GuiFont font)
 {