Don't crash if we can't find a monitor model name

This can happen when running emacs over a forwarded X11 connection.

* src/pgtkfns.c (pgtk_get_monitor_scale_factor): Return 0 if we're
passed a NULL model name.

diff --git a/src/pgtkfns.c b/src/pgtkfns.c
index cee24c1ad12249263987591f8a865e72d660f3e7..07636a25ca0e639d00b424b37061b8c36352d862 100644 (file)
--- a/src/pgtkfns.c
+++ b/src/pgtkfns.c
@@ -66,6 +66,9 @@ static Lisp_Object monitor_scale_factor_alist;
 static double
 pgtk_get_monitor_scale_factor (const char *model)
 {
+  if (model == NULL)
+    return 0.0;
+
   Lisp_Object mdl = build_string (model);
   Lisp_Object tem = Fassoc(mdl, monitor_scale_factor_alist, Qnil);
   if (NILP (tem))