aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorJan Djärv2004-11-23 19:56:55 +0000
committerJan Djärv2004-11-23 19:56:55 +0000
commit255e4140a75aaa6567b3e9b4e64baeb3d1e7eaf3 (patch)
treeabe1e01c0f47fd570aa5cd79c82471bdf0b62b02 /src
parent6f8a2742299b9c3518f87ad2baebfa19867997cc (diff)
downloademacs-255e4140a75aaa6567b3e9b4e64baeb3d1e7eaf3.tar.gz
emacs-255e4140a75aaa6567b3e9b4e64baeb3d1e7eaf3.zip
* gtkutil.c (xg_get_file_name): Rename use-old-gtk-file-dialog to
x-use-old-gtk-file-dialog. * xfns.c: Define x_use_old_gtk_file_dialog. (syms_of_xfns): Rename use-old-gtk-file-dialog to x-... Move it outside ifdef USE_GTK.
Diffstat (limited to 'src')
-rw-r--r--src/ChangeLog9
-rw-r--r--src/gtkutil.c8
-rw-r--r--src/xfns.c20
3 files changed, 24 insertions, 13 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index c9d6b946962..a767007f3f0 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,12 @@
12004-11-23 Jan Dj,Ad(Brv <jan.h.d@swipnet.se>
2
3 * gtkutil.c (xg_get_file_name): Rename use-old-gtk-file-dialog to
4 x-use-old-gtk-file-dialog.
5
6 * xfns.c: Define x_use_old_gtk_file_dialog.
7 (syms_of_xfns): Rename use-old-gtk-file-dialog to x-... Move it
8 outside ifdef USE_GTK.
9
12004-11-23 Kim F. Storm <storm@cua.dk> 102004-11-23 Kim F. Storm <storm@cua.dk>
2 11
3 * dispextern.h (MATRIX_ROW_ENDS_IN_MIDDLE_OF_CHAR_P) 12 * dispextern.h (MATRIX_ROW_ENDS_IN_MIDDLE_OF_CHAR_P)
diff --git a/src/gtkutil.c b/src/gtkutil.c
index 25dd88d544e..759877f3950 100644
--- a/src/gtkutil.c
+++ b/src/gtkutil.c
@@ -1122,10 +1122,6 @@ create_dialog (wv, select_cb, deactivate_cb)
1122/*********************************************************************** 1122/***********************************************************************
1123 File dialog functions 1123 File dialog functions
1124 ***********************************************************************/ 1124 ***********************************************************************/
1125#ifdef HAVE_GTK_FILE_BOTH
1126int use_old_gtk_file_dialog;
1127#endif
1128
1129/* Function that is called when the file dialog pops down. 1125/* Function that is called when the file dialog pops down.
1130 W is the dialog widget, RESPONSE is the response code. 1126 W is the dialog widget, RESPONSE is the response code.
1131 USER_DATA is what we passed in to g_signal_connect (pointer to int). */ 1127 USER_DATA is what we passed in to g_signal_connect (pointer to int). */
@@ -1311,7 +1307,9 @@ xg_get_file_name (f, prompt, default_filename, mustmatch_p, only_dir_p)
1311 xg_get_file_func func; 1307 xg_get_file_func func;
1312 1308
1313#ifdef HAVE_GTK_FILE_BOTH 1309#ifdef HAVE_GTK_FILE_BOTH
1314 if (use_old_gtk_file_dialog) 1310 extern int x_use_old_gtk_file_dialog;
1311
1312 if (x_use_old_gtk_file_dialog)
1315 w = xg_get_file_with_selection (f, prompt, default_filename, 1313 w = xg_get_file_with_selection (f, prompt, default_filename,
1316 mustmatch_p, only_dir_p, &func); 1314 mustmatch_p, only_dir_p, &func);
1317 else 1315 else
diff --git a/src/xfns.c b/src/xfns.c
index 165ba37571d..aa66c017f3c 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -151,6 +151,10 @@ char *gray_bitmap_bits = gray_bits;
151 151
152int display_hourglass_p; 152int display_hourglass_p;
153 153
154/* Non-zero means prompt with the old GTK file selection dialog. */
155
156int x_use_old_gtk_file_dialog;
157
154/* The background and shape of the mouse pointer, and shape when not 158/* The background and shape of the mouse pointer, and shape when not
155 over text or in the modeline. */ 159 over text or in the modeline. */
156 160
@@ -5574,6 +5578,14 @@ such a font. This is especially effective for such large fonts as
5574Chinese, Japanese, and Korean. */); 5578Chinese, Japanese, and Korean. */);
5575 Vx_pixel_size_width_font_regexp = Qnil; 5579 Vx_pixel_size_width_font_regexp = Qnil;
5576 5580
5581/* This is not ifdef:ed, so other builds than GTK can customize it. */
5582 DEFVAR_BOOL ("x-use-old-gtk-file-dialog", &x_use_old_gtk_file_dialog,
5583 doc: /* *Non-nil means prompt with the old GTK file selection dialog.
5584If nil or if the file selection dialog is not available, the new GTK file
5585chooser is used instead. To turn off all file dialogs set the
5586variable `use-file-dialog'. */);
5587 x_use_old_gtk_file_dialog = 0;
5588
5577#ifdef USE_X_TOOLKIT 5589#ifdef USE_X_TOOLKIT
5578 Fprovide (intern ("x-toolkit"), Qnil); 5590 Fprovide (intern ("x-toolkit"), Qnil);
5579#ifdef USE_MOTIF 5591#ifdef USE_MOTIF
@@ -5593,14 +5605,6 @@ Chinese, Japanese, and Korean. */);
5593 Fprovide (intern ("x-toolkit"), Qnil); 5605 Fprovide (intern ("x-toolkit"), Qnil);
5594 Fprovide (intern ("gtk"), Qnil); 5606 Fprovide (intern ("gtk"), Qnil);
5595 5607
5596#ifdef HAVE_GTK_FILE_BOTH
5597 DEFVAR_BOOL ("use-old-gtk-file-dialog", &use_old_gtk_file_dialog,
5598 doc: /* *Non-nil means that the old GTK file selection dialog is used.
5599If nil the new GTK file chooser is used instead. To turn off
5600all file dialogs set the variable `use-file-dialog'. */);
5601 use_old_gtk_file_dialog = 0;
5602#endif
5603
5604 DEFVAR_LISP ("gtk-version-string", &Vgtk_version_string, 5608 DEFVAR_LISP ("gtk-version-string", &Vgtk_version_string,
5605 doc: /* Version info for GTK+. */); 5609 doc: /* Version info for GTK+. */);
5606 { 5610 {