X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fconsole.c;h=5b8e670fababaca98074cfc66aee3c647307af97;hb=27ea365b3903728593fb2726e9336c1b49eb9f4f;hp=0d4b8be24396f15ea840d83ca9e72ab3f6b5718f;hpb=4836e869212eaa972d5a2bdfe61730d8af7b2c61;p=chise%2Fxemacs-chise.git-

diff --git a/src/console.c b/src/console.c
index 0d4b8be..5b8e670 100644
--- a/src/console.c
+++ b/src/console.c
@@ -244,6 +244,11 @@ select_console_1 (Lisp_Object console)
     Vwindow_system = Qx;
   else
 #endif
+#ifdef HAVE_GTK
+  if (CONSOLE_GTK_P (XCONSOLE (console)))
+    Vwindow_system = Qgtk;
+  else
+#endif
 #ifdef HAVE_MS_WINDOWS
   if (CONSOLE_MSWINDOWS_P (XCONSOLE (console)))
     Vwindow_system = Qmswindows;