aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorJan Djärv2004-11-04 15:05:27 +0000
committerJan Djärv2004-11-04 15:05:27 +0000
commit0a4f23f30e353cbe4c85cef460eca779a2553037 (patch)
tree164b4a88f87f06a55f2051ecfda12a98a0147de6 /src
parenta872928c524e28d328ad5abd87ed3bb0f0ebc771 (diff)
downloademacs-0a4f23f30e353cbe4c85cef460eca779a2553037.tar.gz
emacs-0a4f23f30e353cbe4c85cef460eca779a2553037.zip
* gtkutil.h: Declare use_old_gtk_file_dialog.
* gtkutil.c: Make use_old_gtk_file_dialog non-static. (xg_initialize): Moved DEFVAR_BOOL for use_old_gtk_file_dialog ... * xfns.c (syms_of_xfns): ... to here.
Diffstat (limited to 'src')
-rw-r--r--src/ChangeLog6
-rw-r--r--src/gtkutil.c10
-rw-r--r--src/gtkutil.h4
-rw-r--r--src/xfns.c8
4 files changed, 19 insertions, 9 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index 4b88374e71e..0921957b577 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,11 @@
12004-11-04 Jan Dj,Ad(Brv <jan.h.d@swipnet.se> 12004-11-04 Jan Dj,Ad(Brv <jan.h.d@swipnet.se>
2 2
3 * gtkutil.h: Declare use_old_gtk_file_dialog.
4
5 * gtkutil.c: Make use_old_gtk_file_dialog non-static.
6 (xg_initialize): Moved DEFVAR_BOOL for use_old_gtk_file_dialog ...
7 * xfns.c (syms_of_xfns): ... to here.
8
3 * gtkutil.c (xg_get_file_with_chooser): Expand DEFAULT_FILENAME if 9 * gtkutil.c (xg_get_file_with_chooser): Expand DEFAULT_FILENAME if
4 it doesn't start with /. 10 it doesn't start with /.
5 11
diff --git a/src/gtkutil.c b/src/gtkutil.c
index f59ccecbcb8..f5f05709e48 100644
--- a/src/gtkutil.c
+++ b/src/gtkutil.c
@@ -1131,7 +1131,7 @@ enum
1131}; 1131};
1132 1132
1133#ifdef HAVE_GTK_FILE_BOTH 1133#ifdef HAVE_GTK_FILE_BOTH
1134static int use_old_gtk_file_dialog; 1134int use_old_gtk_file_dialog;
1135#endif 1135#endif
1136 1136
1137 1137
@@ -3554,14 +3554,6 @@ xg_initialize ()
3554 "gtk-key-theme-name", 3554 "gtk-key-theme-name",
3555 "Emacs", 3555 "Emacs",
3556 EMACS_CLASS); 3556 EMACS_CLASS);
3557
3558#ifdef HAVE_GTK_FILE_BOTH
3559 DEFVAR_BOOL ("use-old-gtk-file-dialog", &use_old_gtk_file_dialog,
3560 doc: /* *Non-nil means that the old GTK file selection dialog is used.
3561 If nil the new GTK file chooser is used instead. To turn off
3562 all file dialogs set the variable `use-file-dialog'. */);
3563 use_old_gtk_file_dialog = 0;
3564#endif
3565} 3557}
3566 3558
3567#endif /* USE_GTK */ 3559#endif /* USE_GTK */
diff --git a/src/gtkutil.h b/src/gtkutil.h
index b2e2c5f2fff..44e82885d7f 100644
--- a/src/gtkutil.h
+++ b/src/gtkutil.h
@@ -126,6 +126,10 @@ typedef struct _widget_value
126 struct _widget_value *free_list; 126 struct _widget_value *free_list;
127} widget_value; 127} widget_value;
128 128
129#ifdef HAVE_GTK_FILE_BOTH
130extern int use_old_gtk_file_dialog;
131#endif
132
129extern widget_value *malloc_widget_value P_ ((void)); 133extern widget_value *malloc_widget_value P_ ((void));
130extern void free_widget_value P_ ((widget_value *)); 134extern void free_widget_value P_ ((widget_value *));
131 135
diff --git a/src/xfns.c b/src/xfns.c
index 2cf8a59ca52..3179fa1c77b 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -5557,6 +5557,14 @@ Chinese, Japanese, and Korean. */);
5557 Fprovide (intern ("x-toolkit"), Qnil); 5557 Fprovide (intern ("x-toolkit"), Qnil);
5558 Fprovide (intern ("gtk"), Qnil); 5558 Fprovide (intern ("gtk"), Qnil);
5559 5559
5560#ifdef HAVE_GTK_FILE_BOTH
5561 DEFVAR_BOOL ("use-old-gtk-file-dialog", &use_old_gtk_file_dialog,
5562 doc: /* *Non-nil means that the old GTK file selection dialog is used.
5563If nil the new GTK file chooser is used instead. To turn off
5564all file dialogs set the variable `use-file-dialog'. */);
5565 use_old_gtk_file_dialog = 0;
5566#endif
5567
5560 DEFVAR_LISP ("gtk-version-string", &Vgtk_version_string, 5568 DEFVAR_LISP ("gtk-version-string", &Vgtk_version_string,
5561 doc: /* Version info for GTK+. */); 5569 doc: /* Version info for GTK+. */);
5562 { 5570 {