diff src/xfns.c @ 67761:5b8799d65159

* xfns.c (Fx_uses_old_gtk_dialog): New function. * gtkutil.c (xg_uses_old_file_dialog): New function. (xg_get_file_name): Use xg_uses_old_file_dialog. * gtkutil.h: Declare xg_uses_old_file_dialog.

--- a/src/xfns.c	Fri Dec 23 08:40:31 2005 +0000
+++ b/src/xfns.c	Fri Dec 23 11:34:13 2005 +0000
@@ -5236,8 +5236,27 @@
 			File selection dialog
  ***********************************************************************/
 
+DEFUN ("x-uses-old-gtk-dialog", Fx_uses_old_gtk_dialog,
+       Sx_uses_old_gtk_dialog,
+       0, 0, 0,
+       doc: /* Return t if the old Gtk+ file selection dialog is used.  */)
+     ()
+{
+#ifdef USE_GTK
+  extern int use_dialog_box;
+  extern int use_file_dialog;
+
+  if (use_dialog_box
+      && use_file_dialog
+      && have_menus_p ()
+      && xg_uses_old_file_dialog ())
+    return Qt;
+#endif
+  return Qnil;
+}
+
+
 #ifdef USE_MOTIF
-
 /* Callback for "OK" and "Cancel" on file selection dialog.  */
 
 static void
@@ -5857,6 +5876,7 @@
   last_show_tip_args = Qnil;
   staticpro (&last_show_tip_args);
 
+  defsubr (&Sx_uses_old_gtk_dialog);
 #if defined (USE_MOTIF) || defined (USE_GTK)
   defsubr (&Sx_file_dialog);
 #endif