game.input.gtk: throw in case no display is found

diff --git a/basis/game/input/gtk/gtk.factor b/basis/game/input/gtk/gtk.factor
index e2084a1515e9747f925c24ef282d1b0df168d1cf..607c7d6ffce6761da42d3a7c2568d1700941fbda 100644 (file)
--- a/basis/game/input/gtk/gtk.factor
+++ b/basis/game/input/gtk/gtk.factor
@@ -13,7 +13,9 @@ LIBRARY: gdk
 FUNCTION: Display* gdk_x11_display_get_xdisplay ( GdkDisplay* display )
 
 : get-dpy ( -- dpy )
-    gdk_display_get_default gdk_x11_display_get_xdisplay ;
+    gdk_display_get_default [ gdk_x11_display_get_xdisplay ] [
+        "No default display." throw
+    ] if* ;
 
 M: gtk-game-input-backend (open-game-input)
     reset-mouse ;