* xfns.c (syms_of_xfns): Provide x-toolkit also for GTK.

2 files changed, 9 insertions, 0 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 409c8e6c7c5..d850131af81 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2004-05-12  Jan Dj,Ad(Brv  <jan.h.d@swipnet.se>
+
+        * xfns.c (syms_of_xfns): Provide x-toolkit also for GTK.
+
 2004-05-11  Steven Tamm  <steventamm@mac.com>
 
         * macfns.c (Fx_create_frame): Default to using tool-bar by
diff --git a/src/xfns.c b/src/xfns.c
index 6d7f5b92f0b..931d31bcedf 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -5495,6 +5495,11 @@ Chinese, Japanese, and Korean.  */);
 #endif /* USE_X_TOOLKIT */
 
 #ifdef USE_GTK
+  /* Provide x-toolkit also for GTK.  Internally GTK does not use Xt so it
+     is not an X toolkit in that sense (USE_X_TOOLKIT is not defined).
+     But for a user it is a toolkit for X, and indeed, configure
+     accepts --with-x-toolkit=gtk.  */
+  Fprovide (intern ("x-toolkit"), Qnil);
   Fprovide (intern ("gtk"), Qnil);
 
   DEFVAR_LISP ("gtk-version-string", &Vgtk_version_string,