diff options
| author | Jan Djärv | 2004-11-04 15:05:27 +0000 |
|---|---|---|
| committer | Jan Djärv | 2004-11-04 15:05:27 +0000 |
| commit | 0a4f23f30e353cbe4c85cef460eca779a2553037 (patch) | |
| tree | 164b4a88f87f06a55f2051ecfda12a98a0147de6 /src | |
| parent | a872928c524e28d328ad5abd87ed3bb0f0ebc771 (diff) | |
| download | emacs-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/ChangeLog | 6 | ||||
| -rw-r--r-- | src/gtkutil.c | 10 | ||||
| -rw-r--r-- | src/gtkutil.h | 4 | ||||
| -rw-r--r-- | src/xfns.c | 8 |
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 @@ | |||
| 1 | 2004-11-04 Jan Dj,Ad(Brv <jan.h.d@swipnet.se> | 1 | 2004-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 |
| 1134 | static int use_old_gtk_file_dialog; | 1134 | int 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 | ||
| 130 | extern int use_old_gtk_file_dialog; | ||
| 131 | #endif | ||
| 132 | |||
| 129 | extern widget_value *malloc_widget_value P_ ((void)); | 133 | extern widget_value *malloc_widget_value P_ ((void)); |
| 130 | extern void free_widget_value P_ ((widget_value *)); | 134 | extern 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. | ||
| 5563 | If nil the new GTK file chooser is used instead. To turn off | ||
| 5564 | all 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 | { |