|
462
|
1 ;;; gnome-widgets.el --- Import GNOME functions into XEmacs
|
|
|
2
|
|
|
3 ;; Copyright (C) 2000 Free Software Foundation
|
|
|
4
|
|
|
5 ;; Maintainer: William Perry <wmperry@gnu.org>
|
|
|
6 ;; Keywords: extensions, dumped
|
|
|
7
|
|
|
8 ;; This file is part of XEmacs.
|
|
|
9
|
|
|
10 ;; XEmacs is free software; you can redistribute it and/or modify it
|
|
|
11 ;; under the terms of the GNU General Public License as published by
|
|
|
12 ;; the Free Software Foundation; either version 2, or (at your option)
|
|
|
13 ;; any later version.
|
|
|
14
|
|
|
15 ;; XEmacs is distributed in the hope that it will be useful, but
|
|
|
16 ;; WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
17 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
|
18 ;; General Public License for more details.
|
|
|
19
|
|
|
20 ;; You should have received a copy of the GNU General Public License
|
|
|
21 ;; along with XEmacs; see the file COPYING. If not, write to the Free
|
|
|
22 ;; Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
|
|
|
23 ;; 02111-1307, USA.
|
|
|
24
|
|
|
25 ;;; Synched up with: Not in FSF
|
|
|
26
|
|
|
27 ;;; Commentary:
|
|
|
28
|
|
|
29 ;; This file is dumped with XEmacs.
|
|
|
30
|
|
|
31 (eval-and-compile
|
|
|
32 (require 'gtk-ffi))
|
|
|
33
|
|
502
|
34 (globally-declare-fboundp
|
|
|
35 '(gtk-import-function-internal
|
|
|
36 gtk-call-function
|
|
|
37 gtk-button-new-with-label))
|
|
|
38
|
|
462
|
39 (gtk-import-function GtkType gnome_about_get_type)
|
|
|
40 (gtk-import-function GtkWidget gnome_about_new
|
|
|
41 (GtkString . title)
|
|
|
42 (GtkString . version)
|
|
|
43 (GtkString . copyright)
|
|
|
44 (GtkArrayOfString . authors)
|
|
|
45 (GtkString . comments)
|
|
|
46 (GtkString . logo))
|
|
|
47
|
|
|
48
|
|
|
49 (gtk-import-function GtkType gnome_app_get_type)
|
|
|
50
|
|
|
51 ;; Create a new (empty) application window. You must specify the
|
|
|
52 ;; application's name (used internally as an identifier). The window
|
|
|
53 ;; title can be left as NULL, in which case the window's title will
|
|
|
54 ;; not be set.
|
|
|
55 (gtk-import-function GtkWidget gnome_app_new
|
|
|
56 (GtkString . appname)
|
|
|
57 (GtkString . title))
|
|
|
58
|
|
|
59 ;; Constructor for language bindings; you don't normally need this.
|
|
|
60 (gtk-import-function nil gnome_app_construct
|
|
|
61 (GnomeApp . app)
|
|
|
62 (GtkString . appname)
|
|
|
63 (GtkString . title))
|
|
|
64
|
|
|
65 ;; Sets the menu bar of the application window
|
|
|
66 (gtk-import-function nil gnome_app_set_menus
|
|
|
67 (GnomeApp . app)
|
|
|
68 (GtkMenuBar . menubar))
|
|
|
69
|
|
|
70 ;; Sets the main toolbar of the application window
|
|
|
71 (gtk-import-function nil gnome_app_set_toolbar
|
|
|
72 (GnomeApp . app)
|
|
|
73 (GtkToolbar . toolbar))
|
|
|
74
|
|
|
75 ;; Sets the status bar of the application window
|
|
|
76 (gtk-import-function nil gnome_app_set_statusbar
|
|
|
77 (GnomeApp . app)
|
|
|
78 (GtkWidget . statusbar))
|
|
|
79
|
|
|
80 ;; Sets the status bar of the application window, but uses the given
|
|
|
81 ;; container widget rather than creating a new one.
|
|
|
82 (gtk-import-function nil gnome_app_set_statusbar_custom
|
|
|
83 (GnomeApp . app)
|
|
|
84 (GtkWidget . container)
|
|
|
85 (GtkWidget . statusbar))
|
|
|
86
|
|
|
87 ;; Sets the content area of the application window
|
|
|
88 (gtk-import-function nil gnome_app_set_contents
|
|
|
89 (GnomeApp . app)
|
|
|
90 (GtkWidget . contents))
|
|
|
91
|
|
|
92 (gtk-import-function nil gnome_app_add_toolbar
|
|
|
93 (GnomeApp . app)
|
|
|
94 (GtkToolbar . toolbar)
|
|
|
95 (GtkString . name)
|
|
|
96 (GnomeDockItemBehavior . behavior)
|
|
|
97 (GnomeDockPlacement . placement)
|
|
|
98 (gint . band_num)
|
|
|
99 (gint . band_position)
|
|
|
100 (gint . offset))
|
|
|
101
|
|
|
102 (gtk-import-function nil gnome_app_add_docked
|
|
|
103 (GnomeApp . app)
|
|
|
104 (GtkWidget . toolbar)
|
|
|
105 (GtkString . name)
|
|
|
106 (GnomeDockItemBehavior . behavior)
|
|
|
107 (GnomeDockPlacement . placement)
|
|
|
108 (gint . band_num)
|
|
|
109 (gint . band_position)
|
|
|
110 (gint . offset))
|
|
|
111
|
|
|
112 (gtk-import-function nil gnome_app_add_dock_item
|
|
|
113 (GnomeApp . app)
|
|
|
114 (GnomeDockItem . item)
|
|
|
115 (GnomeDockPlacement . placement)
|
|
|
116 (gint . band_num)
|
|
|
117 (gint . band_position)
|
|
|
118 (gint . offset))
|
|
|
119
|
|
|
120 (gtk-import-function nil gnome_app_enable_layout_config
|
|
|
121 (GnomeApp . app)
|
|
|
122 (gboolean . enable))
|
|
|
123
|
|
|
124 (gtk-import-function GnomeDock gnome_app_get_dock
|
|
|
125 (GnomeApp . app))
|
|
|
126 (gtk-import-function GnomeDockItem gnome_app_get_dock_item_by_name
|
|
|
127 (GnomeApp . app)
|
|
|
128 (GtkString . name))
|
|
|
129
|
|
|
130
|
|
|
131 (gtk-import-function GtkType gnome_appbar_get_type)
|
|
|
132
|
|
|
133 (gtk-import-function GtkWidget gnome_appbar_new
|
|
|
134 (gboolean . has_progress)
|
|
|
135 (gboolean . has_status)
|
|
|
136 (GnomePreferencesType . interactivity))
|
|
|
137
|
|
|
138 ;; Sets the status label without changing widget state; next set or push
|
|
|
139 ;; will destroy this permanently.
|
|
|
140 (gtk-import-function nil gnome_appbar_set_status
|
|
|
141 (GnomeAppBar . appbar)
|
|
|
142 (GtkString . status))
|
|
|
143
|
|
|
144 ;; What to show when showing nothing else; defaults to nothing
|
|
|
145 (gtk-import-function nil gnome_appbar_set_default
|
|
|
146 (GnomeAppBar . appbar)
|
|
|
147 (GtkString . default_status))
|
|
|
148
|
|
|
149 (gtk-import-function nil gnome_appbar_push
|
|
|
150 (GnomeAppBar . appbar)
|
|
|
151 (GtkString . status))
|
|
|
152
|
|
|
153 ;; OK to call on empty stack
|
|
|
154 (gtk-import-function nil gnome_appbar_pop
|
|
|
155 (GnomeAppBar . appbar))
|
|
|
156
|
|
|
157 ;; Nuke the stack.
|
|
|
158 (gtk-import-function nil gnome_appbar_clear_stack
|
|
|
159 (GnomeAppBar . appbar))
|
|
|
160
|
|
|
161 ;; pure sugar - with a bad name, in light of the get_progress name
|
|
|
162 ;; which is not the opposite of set_progress. Maybe this function
|
|
|
163 ;; should die
|
|
|
164 (gtk-import-function nil gnome_appbar_set_progress
|
|
|
165 (GnomeAppBar . appbar)
|
|
|
166 (gfloat . percentage))
|
|
|
167
|
|
|
168 ;; use GtkProgress functions on returned value
|
|
|
169 (gtk-import-function GtkProgress gnome_appbar_get_progress
|
|
|
170 (GnomeAppBar . appbar))
|
|
|
171
|
|
|
172 ;; Reflect the current state of stack/default. Useful to force a set_status
|
|
|
173 ;; to disappear.
|
|
|
174 (gtk-import-function nil gnome_appbar_refresh
|
|
|
175 (GnomeAppBar . appbar))
|
|
|
176
|
|
|
177 ;; Put a prompt in the appbar and wait for a response. When the
|
|
|
178 ;; user responds or cancels, a user_response signal is emitted.
|
|
|
179 (gtk-import-function nil gnome_appbar_set_prompt
|
|
|
180 (GnomeAppBar . appbar)
|
|
|
181 (GtkString . prompt)
|
|
|
182 (gboolean . modal))
|
|
|
183
|
|
|
184 ;; Remove any prompt
|
|
|
185 (gtk-import-function nil gnome_appbar_clear_prompt
|
|
|
186 (GnomeAppBar . appbar))
|
|
|
187
|
|
|
188 ;; Get the response to the prompt, if any. Result must be g_free'd.
|
|
|
189 (gtk-import-function GtkString gnome_appbar_get_response
|
|
|
190 (GnomeAppBar . appbar))
|
|
|
191
|
|
|
192
|
|
|
193 (gtk-import-function GtkType gnome_calculator_get_type)
|
|
|
194 (gtk-import-function GtkWidget gnome_calculator_new)
|
|
|
195 (gtk-import-function nil gnome_calculator_clear
|
|
|
196 (GnomeCalculator . gc)
|
|
|
197 (gboolean . reset))
|
|
|
198
|
|
|
199 (gtk-import-function nil gnome_calculator_set
|
|
|
200 (GnomeCalculator . gc)
|
|
|
201 (gdouble . result))
|
|
|
202
|
|
|
203
|
|
|
204 ;; Standard Gtk function
|
|
|
205 (gtk-import-function GtkType gnome_color_picker_get_type)
|
|
|
206
|
|
|
207 ;; Creates a new color picker widget
|
|
|
208 (gtk-import-function GtkWidget gnome_color_picker_new)
|
|
|
209
|
|
|
210 ;; Set/get the color in the picker. Values are in [0.0, 1.0]
|
|
|
211 (gtk-import-function nil gnome_color_picker_set_d
|
|
|
212 (GnomeColorPicker . cp)
|
|
|
213 (gdouble . r)
|
|
|
214 (gdouble . g)
|
|
|
215 (gdouble . b)
|
|
|
216 (gdouble . a))
|
|
|
217
|
|
|
218 ;; #### BILL!!! Need multiple return values
|
|
|
219 ;; void gnome_color_picker_get_d (GnomeColorPicker *cp, gdouble *r, gdouble *g, gdouble *b, gdouble *a)
|
|
|
220
|
|
|
221 ;; Set/get the color in the picker. Values are in [0, 255]
|
|
|
222 (gtk-import-function nil gnome_color_picker_set_i8
|
|
|
223 (GnomeColorPicker . cp)
|
|
|
224 (guint . r)
|
|
|
225 (guint . g)
|
|
|
226 (guint . b)
|
|
|
227 (guint . a))
|
|
|
228
|
|
|
229 ;; #### BILL!!! Need multiple return values
|
|
|
230 ;; void gnome_color_picker_get_i8 (GnomeColorPicker *cp, guint8 *r, guint8 *g, guint8 *b, guint8 *a);
|
|
|
231
|
|
|
232 ;; Set/get the color in the picker. Values are in [0, 65535]
|
|
|
233 (gtk-import-function nil gnome_color_picker_set_i16
|
|
|
234 (GnomeColorPicker . cp)
|
|
|
235 (guint . r)
|
|
|
236 (guint . g)
|
|
|
237 (guint . b)
|
|
|
238 (guint . a))
|
|
|
239
|
|
|
240 ;; #### BILL!!! Need multiple return values
|
|
|
241 ;; void gnome_color_picker_get_i16 (GnomeColorPicker *cp, gushort *r, gushort *g, gushort *b, gushort *a);
|
|
|
242
|
|
|
243 ;; Sets whether the picker should dither the color sample or just paint a solid rectangle
|
|
|
244 (gtk-import-function nil gnome_color_picker_set_dither
|
|
|
245 (GnomeColorPicker . cp)
|
|
|
246 (gboolean . dither))
|
|
|
247
|
|
|
248 ;; Sets whether the picker should use the alpha channel or not
|
|
|
249 (gtk-import-function nil gnome_color_picker_set_use_alpha
|
|
|
250 (GnomeColorPicker . cp)
|
|
|
251 (gboolean . use_alpha))
|
|
|
252
|
|
|
253 ;; Sets the title for the color selection dialog
|
|
|
254 (gtk-import-function nil gnome_color_picker_set_title
|
|
|
255 (GnomeColorPicker . cp)
|
|
|
256 (GtkString . title))
|
|
|
257
|
|
|
258
|
|
|
259 (gtk-import-function GtkType gnome_date_edit_get_type)
|
|
|
260 (gtk-import-function GtkWidget gnome_date_edit_new
|
|
|
261 (time_t . the_time)
|
|
|
262 (gboolean . show_time)
|
|
|
263 (gboolean . use_24_format))
|
|
|
264
|
|
|
265 (gtk-import-function GtkWidget gnome_date_edit_new_flags
|
|
|
266 (time_t . the_time)
|
|
|
267 (GnomeDateEditFlags . flags))
|
|
|
268
|
|
|
269 (gtk-import-function nil gnome_date_edit_set_time
|
|
|
270 (GnomeDateEdit . gde)
|
|
|
271 (time_t . the_time))
|
|
|
272
|
|
|
273 (gtk-import-function nil gnome_date_edit_set_popup_range
|
|
|
274 (GnomeDateEdit . gde)
|
|
|
275 (guint . low_hour)
|
|
|
276 (guint . up_hour))
|
|
|
277
|
|
|
278 (gtk-import-function 'time_t gnome_date_edit_get_date
|
|
|
279 (GnomeDateEdit . gde))
|
|
|
280
|
|
|
281 (gtk-import-function nil gnome_date_edit_set_flags
|
|
|
282 (GnomeDateEdit . gde)
|
|
|
283 (GnomeDateEditFlags . flags))
|
|
|
284
|
|
|
285 (gtk-import-function GnomeDateEditFlags gnome_date_edit_get_flags
|
|
|
286 (GnomeDateEdit . gde))
|
|
|
287
|
|
|
288
|
|
|
289 (gtk-import-function GtkType gnome_dentry_edit_get_type)
|
|
|
290
|
|
|
291 ;; create a new dentry and get the children using the below macros
|
|
|
292 ;; or use the utility new_notebook below
|
|
|
293 (gtk-import-function GtkObject gnome_dentry_edit_new)
|
|
|
294
|
|
|
295 ;;#define gnome_dentry_edit_child1(d) (GNOME_DENTRY_EDIT(d)->child1)
|
|
|
296 ;;#define gnome_dentry_edit_child2(d) (GNOME_DENTRY_EDIT(d)->child2)
|
|
|
297
|
|
|
298 ;; Create a new edit in this notebook - appends two pages to the
|
|
|
299 ;; notebook.
|
|
|
300 (gtk-import-function GtkObject gnome_dentry_edit_new_notebook
|
|
|
301 (GtkNotebook . notebook))
|
|
|
302
|
|
|
303 (gtk-import-function nil gnome_dentry_edit_clear
|
|
|
304 (GnomeDEntryEdit . dee))
|
|
|
305
|
|
|
306 ;; The GnomeDEntryEdit does not store a dentry, and it does not keep
|
|
|
307 ;; track of the location field of GnomeDesktopEntry which will always
|
|
|
308 ;; be NULL.
|
|
|
309
|
|
|
310 ;; Make the display reflect dentry at path
|
|
|
311 (gtk-import-function nil gnome_dentry_edit_load_file
|
|
|
312 (GnomeDEntryEdit . dee)
|
|
|
313 (GtkString . path))
|
|
|
314
|
|
|
315 ;; Copy the contents of this dentry into the display
|
|
|
316 '(gtk-import-function nil gnome_dentry_edit_set_dentry
|
|
|
317 (GnomeDEntryEdit . dee)
|
|
|
318 (GnomeDesktopEntry . dentry))
|
|
|
319
|
|
|
320 ;; Generate a dentry based on the contents of the display
|
|
|
321 '(gtk-import-function GnomeDesktopEntry gnome_dentry_edit_get_dentry
|
|
|
322 (GnomeDEntryEdit . dee))
|
|
|
323
|
|
|
324 ;; Return an allocated string, you need to g_free it.
|
|
|
325 (gtk-import-function GtkString gnome_dentry_edit_get_icon
|
|
|
326 (GnomeDEntryEdit . dee))
|
|
|
327 (gtk-import-function GtkString gnome_dentry_edit_get_name
|
|
|
328 (GnomeDEntryEdit . dee))
|
|
|
329
|
|
|
330 ;; These are accessor functions for the widgets that make up the
|
|
|
331 ;; GnomeDEntryEdit widget.
|
|
|
332 (gtk-import-function GtkWidget gnome_dentry_get_name_entry (GnomeDEntryEdit . dee))
|
|
|
333 (gtk-import-function GtkWidget gnome_dentry_get_comment_entry (GnomeDEntryEdit . dee))
|
|
|
334 (gtk-import-function GtkWidget gnome_dentry_get_exec_entry (GnomeDEntryEdit . dee))
|
|
|
335 (gtk-import-function GtkWidget gnome_dentry_get_tryexec_entry (GnomeDEntryEdit . dee))
|
|
|
336 (gtk-import-function GtkWidget gnome_dentry_get_doc_entry (GnomeDEntryEdit . dee))
|
|
|
337 (gtk-import-function GtkWidget gnome_dentry_get_icon_entry (GnomeDEntryEdit . dee))
|
|
|
338
|
|
|
339
|
|
|
340 ;; The GtkWidget * return values were added in retrospect; sometimes
|
|
|
341 ;; you might want to connect to the "close" signal of the dialog, or
|
|
|
342 ;; something, the return value makes the functions more
|
|
|
343 ;; flexible. However, there is nothing especially guaranteed about
|
|
|
344 ;; these dialogs except that they will be dialogs, so don't count on
|
|
|
345 ;; anything.
|
|
|
346
|
|
|
347 ;; A little OK box
|
|
|
348 (gtk-import-function GtkWidget gnome_ok_dialog (GtkString . message))
|
|
|
349 (gtk-import-function GtkWidget gnome_ok_dialog_parented
|
|
|
350 (GtkString . message)
|
|
|
351 (GtkWindow . parent))
|
|
|
352
|
|
|
353 ;; Operation failed fatally. In an OK dialog.
|
|
|
354 (gtk-import-function GtkWidget gnome_error_dialog '(GtkString . error))
|
|
|
355 (gtk-import-function GtkWidget gnome_error_dialog_parented
|
|
|
356 (GtkString . error)
|
|
|
357 (GtkWindow . parent))
|
|
|
358
|
|
|
359 ;; Just a warning.
|
|
|
360 (gtk-import-function GtkWidget gnome_warning_dialog '(GtkString . warning))
|
|
|
361 (gtk-import-function GtkWidget gnome_warning_dialog_parented
|
|
|
362 (GtkString . warning)
|
|
|
363 (GtkWindow . parent))
|
|
|
364
|
|
|
365 ;;;/* Look in gnome-types.h for the callback types. */
|
|
|
366
|
|
|
367 ;;;/* Ask a yes or no question, and call the callback when it's answered. */
|
|
|
368 ;;;GtkWidget * gnome_question_dialog (const gchar * question,
|
|
|
369 ;;; GnomeReplyCallback callback,
|
|
|
370 ;;; gpointer data);
|
|
|
371
|
|
|
372 ;;;GtkWidget * gnome_question_dialog_parented (const gchar * question,
|
|
|
373 ;;; GnomeReplyCallback callback,
|
|
|
374 ;;; gpointer data,
|
|
|
375 ;;; GtkWindow * parent);
|
|
|
376
|
|
|
377 ;;;GtkWidget * gnome_question_dialog_modal (const gchar * question,
|
|
|
378 ;;; GnomeReplyCallback callback,
|
|
|
379 ;;; gpointer data);
|
|
|
380
|
|
|
381 ;;;GtkWidget * gnome_question_dialog_modal_parented (const gchar * question,
|
|
|
382 ;;; GnomeReplyCallback callback,
|
|
|
383 ;;; gpointer data,
|
|
|
384 ;;; GtkWindow * parent);
|
|
|
385
|
|
|
386
|
|
|
387 ;;;/* OK-Cancel question. */
|
|
|
388 ;;;GtkWidget * gnome_ok_cancel_dialog (const gchar * message,
|
|
|
389 ;;; GnomeReplyCallback callback,
|
|
|
390 ;;; gpointer data);
|
|
|
391
|
|
|
392 ;;;GtkWidget * gnome_ok_cancel_dialog_parented (const gchar * message,
|
|
|
393 ;;; GnomeReplyCallback callback,
|
|
|
394 ;;; gpointer data,
|
|
|
395 ;;; GtkWindow * parent);
|
|
|
396
|
|
|
397 ;;;GtkWidget * gnome_ok_cancel_dialog_modal (const gchar * message,
|
|
|
398 ;;; GnomeReplyCallback callback,
|
|
|
399 ;;; gpointer data);
|
|
|
400
|
|
|
401 ;;;GtkWidget * gnome_ok_cancel_dialog_modal_parented (const gchar * message,
|
|
|
402 ;;; GnomeReplyCallback callback,
|
|
|
403 ;;; gpointer data,
|
|
|
404 ;;; GtkWindow * parent);
|
|
|
405
|
|
|
406
|
|
|
407 (gtk-import-function GtkType gnome_file_entry_get_type)
|
|
|
408 (gtk-import-function GtkWidget gnome_file_entry_new
|
|
|
409 (GtkString . history_id)
|
|
|
410 (GtkString . browse_dialog_title))
|
|
|
411
|
|
|
412 (gtk-import-function nil gnome_file_entry_construct
|
|
|
413 (GnomeFileEntry . fentry)
|
|
|
414 (GtkString . history_id)
|
|
|
415 (GtkString . browse_dialog_title))
|
|
|
416
|
|
|
417 (gtk-import-function GtkWidget gnome_file_entry_gnome_entry
|
|
|
418 (GnomeFileEntry .fentry))
|
|
|
419
|
|
|
420 (gtk-import-function GtkWidget gnome_file_entry_gtk_entry
|
|
|
421 (GnomeFileEntry . fentry))
|
|
|
422
|
|
|
423 (gtk-import-function nil gnome_file_entry_set_title
|
|
|
424 (GnomeFileEntry . fentry)
|
|
|
425 (GtkString . browse_dialog_title))
|
|
|
426
|
|
|
427 ;; set default path for the browse dialog
|
|
|
428 (gtk-import-function nil gnome_file_entry_set_default_path
|
|
|
429 (GnomeFileEntry . fentry)
|
|
|
430 (GtkString . path))
|
|
|
431
|
|
|
432 ;; sets up the file entry to be a directory picker rather then a file picker
|
|
|
433 (gtk-import-function nil gnome_file_entry_set_directory
|
|
|
434 (GnomeFileEntry . fentry)
|
|
|
435 (gboolean . directory_entry))
|
|
|
436
|
|
|
437 ;; returns a filename which is a full path with WD or the default
|
|
|
438 ;; directory prepended if it's not an absolute path, returns
|
|
|
439 ;; NULL on empty entry or if the file doesn't exist and that was
|
|
|
440 ;; a requirement
|
|
|
441 (gtk-import-function GtkString gnome_file_entry_get_full_path
|
|
|
442 (GnomeFileEntry . fentry)
|
|
|
443 (gboolean . file_must_exist))
|
|
|
444
|
|
|
445 ;; set modality of the file browse dialog, only applies for the
|
|
|
446 ;; next time a dialog is created
|
|
|
447 (gtk-import-function nil gnome_file_entry_set_modal
|
|
|
448 (GnomeFileEntry . fentry)
|
|
|
449 (gboolean . is_modal))
|
|
|
450
|
|
|
451
|
|
|
452 ;; Standard Gtk function
|
|
|
453 (gtk-import-function GtkType gnome_font_picker_get_type)
|
|
|
454
|
|
|
455 ;; Creates a new font picker widget
|
|
|
456 (gtk-import-function GtkWidget gnome_font_picker_new)
|
|
|
457
|
|
|
458 ;; Sets the title for the font selection dialog
|
|
|
459 (gtk-import-function nil gnome_font_picker_set_title
|
|
|
460 (GnomeFontPicker . gfp)
|
|
|
461 (GtkString . title))
|
|
|
462
|
|
|
463 ;; Button mode
|
|
|
464 (gtk-import-function GnomeFontPickerMode gnome_font_picker_get_mode
|
|
|
465 (GnomeFontPicker . gfp))
|
|
|
466
|
|
|
467 (gtk-import-function nil gnome_font_picker_set_mode
|
|
|
468 (GnomeFontPicker . gfp)
|
|
|
469 (GnomeFontPickerMode . mode))
|
|
|
470
|
|
|
471 ;; With GNOME_FONT_PICKER_MODE_FONT_INFO
|
|
|
472 ;; If use_font_in_label is true, font name will be writen using font choosed by user and
|
|
|
473 ;; using size passed to this function
|
|
|
474 (gtk-import-function nil gnome_font_picker_fi_set_use_font_in_label
|
|
|
475 (GnomeFontPicker . gfp)
|
|
|
476 (gboolean . use_font_in_label)
|
|
|
477 (gint . size))
|
|
|
478
|
|
|
479 (gtk-import-function nil gnome_font_picker_fi_set_show_size
|
|
|
480 (GnomeFontPicker . gfp)
|
|
|
481 (gboolean . show_size))
|
|
|
482
|
|
|
483 ;; With GNOME_FONT_PICKER_MODE_USER_WIDGET
|
|
|
484 (gtk-import-function nil gnome_font_picker_uw_set_widget
|
|
|
485 (GnomeFontPicker . gfp)
|
|
|
486 (GtkWidget . widget))
|
|
|
487
|
|
|
488 ;; Functions to interface with GtkFontSelectionDialog
|
|
|
489 (gtk-import-function GtkString gnome_font_picker_get_font_name
|
|
|
490 (GnomeFontPicker . gfp))
|
|
|
491
|
|
|
492 ;;;GdkFont* gnome_font_picker_get_font (GnomeFontPicker *gfp);
|
|
|
493
|
|
|
494 (gtk-import-function gboolean gnome_font_picker_set_font_name
|
|
|
495 (GnomeFontPicker . gfp)
|
|
|
496 (GtkString . fontname))
|
|
|
497
|
|
|
498 (gtk-import-function GtkString gnome_font_picker_get_preview_text
|
|
|
499 (GnomeFontPicker . gfp))
|
|
|
500
|
|
|
501 (gtk-import-function nil gnome_font_picker_set_preview_text
|
|
|
502 (GnomeFontPicker . gfp)
|
|
|
503 (GtkString . text))
|
|
|
504
|
|
|
505
|
|
|
506 (gtk-import-function GtkType gnome_href_get_type)
|
|
|
507 (gtk-import-function GtkWidget gnome_href_new
|
|
|
508 (GtkString . url)
|
|
|
509 (GtkString . label))
|
|
|
510
|
|
|
511 (gtk-import-function nil gnome_href_set_url
|
|
|
512 (GnomeHRef . href)
|
|
|
513 (GtkString . url))
|
|
|
514 (gtk-import-function GtkString gnome_href_get_url
|
|
|
515 (GnomeHRef . href))
|
|
|
516
|
|
|
517 (gtk-import-function nil gnome_href_set_label
|
|
|
518 (GnomeHRef . href)
|
|
|
519 (GtkString . label))
|
|
|
520
|
|
|
521 (gtk-import-function GtkString gnome_href_get_label
|
|
|
522 (GnomeHRef . href))
|
|
|
523
|
|
|
524
|
|
|
525 ;; Stock icons, buttons, and menu items.
|
|
|
526
|
|
|
527 ;; A short description:
|
|
|
528
|
|
|
529 ;; These functions provide an applications programmer with default
|
|
|
530 ;; icons for toolbars, menu pixmaps, etc. One such `icon' should have
|
|
|
531 ;; at least three pixmaps to reflect it's state. There is a `regular'
|
|
|
532 ;; pixmap, a `disabled' pixmap and a `focused' pixmap. You can get
|
|
|
533 ;; either each of these pixmaps by calling gnome_stock_pixmap or you
|
|
|
534 ;; can get a widget by calling gnome_stock_pixmap_widget. This widget
|
|
|
535 ;; is a container which gtk_widget_shows the pixmap, that is
|
|
|
536 ;; reflecting the current state of the widget. If for example you
|
|
|
537 ;; gtk_container_add this widget to a button, which is currently not
|
|
|
538 ;; sensitive, the widget will just show the `disabled' pixmap. If the
|
|
|
539 ;; state of the button changes to sensitive, the widget will change to
|
|
|
540 ;; the `regular' pixmap. The `focused' pixmap will be shown, when the
|
|
|
541 ;; mouse pointer enters the widget.
|
|
|
542
|
|
|
543 ;; To support themability, we use (char *) to call those functions. A
|
|
|
544 ;; new theme might register new icons by calling
|
|
|
545 ;; gnome_stock_pixmap_register, or may change existing icons by
|
|
|
546 ;; calling gnome_stock_pixmap_change. An application should check (by
|
|
|
547 ;; calling gnome_stock_pixmap_checkfor), if the current theme supports
|
|
|
548 ;; an uncommon icon, before using it. The only icons an app can rely
|
|
|
549 ;; on, are those defined in this header file.
|
|
|
550
|
|
|
551 ;; We now have stock buttons too. To use them, just replace any
|
|
|
552 ;; gtk_button_new{_with_label} with
|
|
|
553 ;; gnome_stock_button(GNOME_STOCK_BUTTON_...). This function returns
|
|
|
554 ;; a GtkButton with a gettexted default text and an icon.
|
|
|
555
|
|
|
556 ;; There's an additional feature, which might be interesting. If an
|
|
|
557 ;; application calls gnome_stock_pixmap_register and uses it by
|
|
|
558 ;; calling gnome_stock_pixmap_widget, it doesn't have to care about
|
|
|
559 ;; the state_changed signal to display the appropriate pixmap
|
|
|
560 ;; itself. Additionally gnome-stock generates a disabled version of a
|
|
|
561 ;; pixmap automatically, when no pixmap for a disabled state is
|
|
|
562 ;; provided.
|
|
|
563
|
|
|
564
|
|
|
565 ;; State:
|
|
|
566
|
|
|
567 ;; currently implemented:
|
|
|
568 ;; - gnome_stock_pixmap
|
|
|
569 ;; - gnome_stock_pixmap_widget
|
|
|
570 ;; - gnome_stock_pixmap_checkfor
|
|
|
571 ;; - GnomeStockPixmapWidget
|
|
|
572 ;; - gnome_stock_button
|
|
|
573 ;; - gnome_stock_pixmap_register
|
|
|
574
|
|
|
575 ;; not implemented:
|
|
|
576 ;; - gnome_stock_pixmap_change
|
|
|
577
|
|
|
578 ;; The names of `well known' icons. I define these strings mainly to
|
|
|
579 ;; prevent errors due to typos.
|
|
|
580
|
|
|
581 (defvar gnome-stock-pixmaps '(
|
|
|
582 (new . "New")
|
|
|
583 (open . "Open")
|
|
|
584 (close . "Close")
|
|
|
585 (revert . "Revert")
|
|
|
586 (save . "Save")
|
|
|
587 (save-as . "Save As")
|
|
|
588 (cut . "Cut")
|
|
|
589 (copy . "Copy")
|
|
|
590 (paste . "Paste")
|
|
|
591 (clear . "Clear")
|
|
|
592 (properties . "Properties")
|
|
|
593 (preferences . "Preferences")
|
|
|
594 (help . "Help")
|
|
|
595 (scores . "Scores")
|
|
|
596 (print . "Print")
|
|
|
597 (search . "Search")
|
|
|
598 (srchrpl . "Search/Replace")
|
|
|
599 (back . "Back")
|
|
|
600 (forward . "Forward")
|
|
|
601 (first . "First")
|
|
|
602 (last . "Last")
|
|
|
603 (home . "Home")
|
|
|
604 (stop . "Stop")
|
|
|
605 (refresh . "Refresh")
|
|
|
606 (undo . "Undo")
|
|
|
607 (redo . "Redo")
|
|
|
608 (timer . "Timer")
|
|
|
609 (timer-stop . "Timer Stopped")
|
|
|
610 (mail . "Mail")
|
|
|
611 (mail-rcv . "Receive Mail")
|
|
|
612 (mail-snd . "Send Mail")
|
|
|
613 (mail-rpl . "Reply to Mail")
|
|
|
614 (mail-fwd . "Forward Mail")
|
|
|
615 (mail-new . "New Mail")
|
|
|
616 (trash . "Trash")
|
|
|
617 (trash-full . "Trash Full")
|
|
|
618 (undelete . "Undelete")
|
|
|
619 (spellcheck . "Spellchecker")
|
|
|
620 (mic . "Microphone")
|
|
|
621 (line-in . "Line In")
|
|
|
622 (cdrom . "Cdrom")
|
|
|
623 (volume . "Volume")
|
|
|
624 (midi . "Midi")
|
|
|
625 (book-red . "Book Red")
|
|
|
626 (book-green . "Book Green")
|
|
|
627 (book-blue . "Book Blue")
|
|
|
628 (BOOK-YELLOW . "Book Yellow")
|
|
|
629 (BOOK-OPEN . "Book Open")
|
|
|
630 (ABOUT . "About")
|
|
|
631 (QUIT . "Quit")
|
|
|
632 (MULTIPLE . "Multiple")
|
|
|
633 (NOT . "Not")
|
|
|
634 (CONVERT . "Convert")
|
|
|
635 (JUMP-TO . "Jump To")
|
|
|
636 (UP . "Up")
|
|
|
637 (DOWN . "Down")
|
|
|
638 (TOP . "Top")
|
|
|
639 (BOTTOM . "Bottom")
|
|
|
640 (ATTACH . "Attach")
|
|
|
641 (INDEX . "Index")
|
|
|
642 (FONT . "Font")
|
|
|
643 (EXEC . "Exec")
|
|
|
644
|
|
|
645 (ALIGN-LEFT . "Left")
|
|
|
646 (ALIGN-RIGHT . "Right")
|
|
|
647 (ALIGN-CENTER . "Center")
|
|
|
648 (ALIGN-JUSTIFY . "Justify")
|
|
|
649
|
|
|
650 (TEXT-BOLD . "Bold")
|
|
|
651 (TEXT-ITALIC . "Italic")
|
|
|
652 (TEXT-UNDERLINE . "Underline")
|
|
|
653 (TEXT-STRIKEOUT . "Strikeout")
|
|
|
654
|
|
|
655 (TEXT-INDENT . "Text Indent")
|
|
|
656 (TEXT-UNINDENT . "Text Unindent")
|
|
|
657
|
|
|
658 (EXIT . "Quit")
|
|
|
659
|
|
|
660 (COLORSELECTOR . "Color Select")
|
|
|
661
|
|
|
662 (ADD . "Add")
|
|
|
663 (REMOVE . "Remove")
|
|
|
664
|
|
|
665 (TABLE-BORDERS . "Table Borders")
|
|
|
666 (TABLE-FILL . "Table Fill")
|
|
|
667
|
|
|
668 (TEXT-BULLETED-LIST . "Text Bulleted List")
|
|
|
669 (TEXT-NUMBERED-LIST . "Text Numbered List")
|
|
|
670 ))
|
|
|
671
|
|
|
672 ;; The basic pixmap version of an icon.
|
|
|
673
|
|
|
674 ;;#define GNOME_STOCK_PIXMAP_REGULAR "regular"
|
|
|
675 ;;#define GNOME_STOCK_PIXMAP_DISABLED "disabled"
|
|
|
676 ;;#define GNOME_STOCK_PIXMAP_FOCUSED "focused"
|
|
|
677
|
|
|
678 (defvar gnome-stock-pixmap-widget-new nil)
|
|
|
679
|
|
|
680 (defun gnome-stock-pixmap-widget-new (window symbol)
|
|
|
681 "Load a stock pixmap named SYMBOL using WINDOW as the parent."
|
|
|
682 (if (not gnome-stock-pixmap-widget-new)
|
|
|
683 (setq gnome-stock-pixmap-widget-new (gtk-import-function-internal
|
|
|
684 'GtkWidget
|
|
|
685 "gnome_stock_pixmap_widget_new"
|
|
|
686 '(GtkWidget GtkString))))
|
|
|
687 (let ((translation (assq symbol gnome-stock-pixmaps)))
|
|
|
688 (if (not translation)
|
|
|
689 (error "Unknown stock pixmap: %S" symbol))
|
|
|
690 (gtk-call-function gnome-stock-pixmap-widget-new (list window (cdr translation)))))
|
|
|
691
|
|
|
692 (gtk-import-function GtkType gnome_stock_get_type)
|
|
|
693 (gtk-import-function GtkWidget gnome_stock_new)
|
|
|
694 (gtk-import-function GtkWidget gnome_stock_new_with_icon '(GtkString . icon))
|
|
|
695 (gtk-import-function gboolean gnome_stock_set_icon
|
|
|
696 (GnomeStock . stock)
|
|
|
697 (GtkString . icon))
|
|
|
698
|
|
|
699 ;; just fetch a GnomeStock(PixmapWidget)
|
|
|
700 ;; It is possible to specify a filename instead of an icon name. Gnome stock
|
|
|
701 ;; will use gnome_pixmap_file to find the pixmap and return a GnomeStock widget
|
|
|
702 ;; from that file.
|
|
|
703 (gtk-import-function GtkWidget gnome_stock_pixmap_widget
|
|
|
704 (GtkWidget . window)
|
|
|
705 (GtkString . icon))
|
|
|
706
|
|
|
707 ;; This function loads that file scaled to the specified size. Unlike
|
|
|
708 ;; gnome_pixmap_new_from_file_at_size this function uses antializing and stuff
|
|
|
709 ;; to scale the pixmap
|
|
|
710 (gtk-import-function GtkWidget gnome_stock_pixmap_widget_at_size
|
|
|
711 (GtkWidget . window)
|
|
|
712 (GtkString . icon)
|
|
|
713 (guint . width)
|
|
|
714 (guint . height))
|
|
|
715
|
|
|
716 (gtk-import-function nil gnome_stock_pixmap_widget_set_icon
|
|
|
717 (GnomeStock . widget)
|
|
|
718 (GtkString . icon))
|
|
|
719
|
|
|
720 ;;;gint gnome_stock_pixmap_register (const char *icon,
|
|
|
721 ;;; const char *subtype,
|
|
|
722 ;;; GnomeStockPixmapEntry *entry);
|
|
|
723
|
|
|
724 ;; change an existing entry. returns non-zero on success
|
|
|
725 ;;;gint gnome_stock_pixmap_change (const char *icon,
|
|
|
726 ;;; const char *subtype,
|
|
|
727 ;;; GnomeStockPixmapEntry *entry);
|
|
|
728
|
|
|
729 ;; check for the existance of an entry. returns the entry if it
|
|
|
730 ;; exists, or NULL otherwise
|
|
|
731 ;;;GnomeStockPixmapEntry *gnome_stock_pixmap_checkfor (const char *icon,
|
|
|
732 ;;; const char *subtype);
|
|
|
733
|
|
|
734 ;; buttons
|
|
|
735
|
|
|
736 (defvar gnome-stock-buttons '((ok . "Button_Ok")
|
|
|
737 (cancel . "Button_Cancel")
|
|
|
738 (yes . "Button_Yes")
|
|
|
739 (no . "Button_No")
|
|
|
740 (close . "Button_Close")
|
|
|
741 (apply . "Button_Apply")
|
|
|
742 (help . "Button_Help")
|
|
|
743 (next . "Button_Next")
|
|
|
744 (prev . "Button_Prev")
|
|
|
745 (up . "Button_Up")
|
|
|
746 (down . "Button_Down")
|
|
|
747 (font . "Button_Font")))
|
|
|
748
|
|
|
749 ;; this function returns a button with a pixmap (if ButtonUseIcons is enabled)
|
|
|
750 ;; and the provided text
|
|
|
751
|
|
|
752 (gtk-import-function GtkWidget gnome_pixmap_button
|
|
|
753 (GtkWidget . pixmap)
|
|
|
754 (GtkString . text))
|
|
|
755 (gtk-import-function nil gnome_button_can_default
|
|
|
756 (GtkButton . button)
|
|
|
757 (gboolean . can_default))
|
|
|
758
|
|
|
759 (defvar gnome-stock-button nil)
|
|
|
760
|
|
|
761 (defun gnome-stock-button (symbol)
|
|
|
762 "Returns a default button widget for dialogs."
|
|
|
763 (if (not gnome-stock-button)
|
|
|
764 (setq gnome-stock-button (gtk-import-function-internal
|
|
|
765 'GtkWidget "gnome_stock_button"
|
|
|
766 '(GtkString))))
|
|
|
767 (let ((translation (assq symbol gnome-stock-buttons)))
|
|
|
768 (if (not translation)
|
|
|
769 (error "Unknown stock button: %S" symbol))
|
|
|
770 (gtk-call-function gnome-stock-button (list (cdr translation)))))
|
|
|
771
|
|
|
772 (defun gnome-stock-or-ordinary-button (type)
|
|
|
773 "Returns a button widget. If the TYPE argument matches a
|
|
|
774 GNOME_STOCK_BUTTON_* define, then a stock button is created.
|
|
|
775 Otherwise, an ordinary button is created, and TYPE is given as the
|
|
|
776 label."
|
|
|
777 (if (stringp type) (setq type (intern type)))
|
|
|
778 (condition-case ()
|
|
|
779 (gnome-stock-button type)
|
|
|
780 (error (gtk-button-new-with-label (symbol-name type)))))
|
|
|
781
|
|
|
782 ;;/* menus */
|
|
|
783
|
|
|
784 ;;#define GNOME_STOCK_MENU_BLANK "Menu_"
|
|
|
785 ;;#define GNOME_STOCK_MENU_NEW "Menu_New"
|
|
|
786 ;;#define GNOME_STOCK_MENU_SAVE "Menu_Save"
|
|
|
787 ;;#define GNOME_STOCK_MENU_SAVE_AS "Menu_Save As"
|
|
|
788 ;;#define GNOME_STOCK_MENU_REVERT "Menu_Revert"
|
|
|
789 ;;#define GNOME_STOCK_MENU_OPEN "Menu_Open"
|
|
|
790 ;;#define GNOME_STOCK_MENU_CLOSE "Menu_Close"
|
|
|
791 ;;#define GNOME_STOCK_MENU_QUIT "Menu_Quit"
|
|
|
792 ;;#define GNOME_STOCK_MENU_CUT "Menu_Cut"
|
|
|
793 ;;#define GNOME_STOCK_MENU_COPY "Menu_Copy"
|
|
|
794 ;;#define GNOME_STOCK_MENU_PASTE "Menu_Paste"
|
|
|
795 ;;#define GNOME_STOCK_MENU_PROP "Menu_Properties"
|
|
|
796 ;;#define GNOME_STOCK_MENU_PREF "Menu_Preferences"
|
|
|
797 ;;#define GNOME_STOCK_MENU_ABOUT "Menu_About"
|
|
|
798 ;;#define GNOME_STOCK_MENU_SCORES "Menu_Scores"
|
|
|
799 ;;#define GNOME_STOCK_MENU_UNDO "Menu_Undo"
|
|
|
800 ;;#define GNOME_STOCK_MENU_REDO "Menu_Redo"
|
|
|
801 ;;#define GNOME_STOCK_MENU_PRINT "Menu_Print"
|
|
|
802 ;;#define GNOME_STOCK_MENU_SEARCH "Menu_Search"
|
|
|
803 ;;#define GNOME_STOCK_MENU_SRCHRPL "Menu_Search/Replace"
|
|
|
804 ;;#define GNOME_STOCK_MENU_BACK "Menu_Back"
|
|
|
805 ;;#define GNOME_STOCK_MENU_FORWARD "Menu_Forward"
|
|
|
806 ;;#define GNOME_STOCK_MENU_FIRST "Menu_First"
|
|
|
807 ;;#define GNOME_STOCK_MENU_LAST "Menu_Last"
|
|
|
808 ;;#define GNOME_STOCK_MENU_HOME "Menu_Home"
|
|
|
809 ;;#define GNOME_STOCK_MENU_STOP "Menu_Stop"
|
|
|
810 ;;#define GNOME_STOCK_MENU_REFRESH "Menu_Refresh"
|
|
|
811 ;;#define GNOME_STOCK_MENU_MAIL "Menu_Mail"
|
|
|
812 ;;#define GNOME_STOCK_MENU_MAIL_RCV "Menu_Receive Mail"
|
|
|
813 ;;#define GNOME_STOCK_MENU_MAIL_SND "Menu_Send Mail"
|
|
|
814 ;;#define GNOME_STOCK_MENU_MAIL_RPL "Menu_Reply to Mail"
|
|
|
815 ;;#define GNOME_STOCK_MENU_MAIL_FWD "Menu_Forward Mail"
|
|
|
816 ;;#define GNOME_STOCK_MENU_MAIL_NEW "Menu_New Mail"
|
|
|
817 ;;#define GNOME_STOCK_MENU_TRASH "Menu_Trash"
|
|
|
818 ;;#define GNOME_STOCK_MENU_TRASH_FULL "Menu_Trash Full"
|
|
|
819 ;;#define GNOME_STOCK_MENU_UNDELETE "Menu_Undelete"
|
|
|
820 ;;#define GNOME_STOCK_MENU_TIMER "Menu_Timer"
|
|
|
821 ;;#define GNOME_STOCK_MENU_TIMER_STOP "Menu_Timer Stopped"
|
|
|
822 ;;#define GNOME_STOCK_MENU_SPELLCHECK "Menu_Spellchecker"
|
|
|
823 ;;#define GNOME_STOCK_MENU_MIC "Menu_Microphone"
|
|
|
824 ;;#define GNOME_STOCK_MENU_LINE_IN "Menu_Line In"
|
|
|
825 ;;#define GNOME_STOCK_MENU_CDROM "Menu_Cdrom"
|
|
|
826 ;;#define GNOME_STOCK_MENU_VOLUME "Menu_Volume"
|
|
|
827 ;;#define GNOME_STOCK_MENU_MIDI "Menu_Midi"
|
|
|
828 ;;#define GNOME_STOCK_MENU_BOOK_RED "Menu_Book Red"
|
|
|
829 ;;#define GNOME_STOCK_MENU_BOOK_GREEN "Menu_Book Green"
|
|
|
830 ;;#define GNOME_STOCK_MENU_BOOK_BLUE "Menu_Book Blue"
|
|
|
831 ;;#define GNOME_STOCK_MENU_BOOK_YELLOW "Menu_Book Yellow"
|
|
|
832 ;;#define GNOME_STOCK_MENU_BOOK_OPEN "Menu_Book Open"
|
|
|
833 ;;#define GNOME_STOCK_MENU_CONVERT "Menu_Convert"
|
|
|
834 ;;#define GNOME_STOCK_MENU_JUMP_TO "Menu_Jump To"
|
|
|
835 ;;#define GNOME_STOCK_MENU_UP "Menu_Up"
|
|
|
836 ;;#define GNOME_STOCK_MENU_DOWN "Menu_Down"
|
|
|
837 ;;#define GNOME_STOCK_MENU_TOP "Menu_Top"
|
|
|
838 ;;#define GNOME_STOCK_MENU_BOTTOM "Menu_Bottom"
|
|
|
839 ;;#define GNOME_STOCK_MENU_ATTACH "Menu_Attach"
|
|
|
840 ;;#define GNOME_STOCK_MENU_INDEX "Menu_Index"
|
|
|
841 ;;#define GNOME_STOCK_MENU_FONT "Menu_Font"
|
|
|
842 ;;#define GNOME_STOCK_MENU_EXEC "Menu_Exec"
|
|
|
843
|
|
|
844 ;;#define GNOME_STOCK_MENU_ALIGN_LEFT "Menu_Left"
|
|
|
845 ;;#define GNOME_STOCK_MENU_ALIGN_RIGHT "Menu_Right"
|
|
|
846 ;;#define GNOME_STOCK_MENU_ALIGN_CENTER "Menu_Center"
|
|
|
847 ;;#define GNOME_STOCK_MENU_ALIGN_JUSTIFY "Menu_Justify"
|
|
|
848
|
|
|
849 ;;#define GNOME_STOCK_MENU_TEXT_BOLD "Menu_Bold"
|
|
|
850 ;;#define GNOME_STOCK_MENU_TEXT_ITALIC "Menu_Italic"
|
|
|
851 ;;#define GNOME_STOCK_MENU_TEXT_UNDERLINE "Menu_Underline"
|
|
|
852 ;;#define GNOME_STOCK_MENU_TEXT_STRIKEOUT "Menu_Strikeout"
|
|
|
853
|
|
|
854 ;;#define GNOME_STOCK_MENU_EXIT GNOME_STOCK_MENU_QUIT
|
|
|
855
|
|
|
856
|
|
|
857 ;;/* returns a GtkMenuItem with an stock icon and text */
|
|
|
858 ;;GtkWidget *gnome_stock_menu_item (const char *type,
|
|
|
859 ;; const char *text);
|
|
|
860
|
|
|
861
|
|
|
862 ;; Creates a toplevel window with a shaped mask. Useful for making the DnD
|
|
|
863 ;; windows
|
|
|
864 ;; GtkWidget *gnome_stock_transparent_window (const char *icon, const char *subtype);
|
|
|
865
|
|
|
866 ;;;/*
|
|
|
867 ;;; * Return a GdkPixmap and GdkMask for a stock pixmap
|
|
|
868 ;;; */
|
|
|
869 ;;;void gnome_stock_pixmap_gdk (const char *icon,
|
|
|
870 ;;; const char *subtype,
|
|
|
871 ;;; GdkPixmap **pixmap,
|
|
|
872 ;;; GdkPixmap **mask);
|
|
|
873
|
|
|
874
|
|
|
875 (gtk-import-function GtkType gnome_druid_get_type)
|
|
|
876 (gtk-import-function GtkWidget gnome_druid_new)
|
|
|
877 (gtk-import-function void gnome_druid_set_buttons_sensitive
|
|
|
878 (GnomeDruid . druid)
|
|
|
879 (gboolean . back_sensitive)
|
|
|
880 (gboolean . next_sensitive)
|
|
|
881 (gboolean . cancel_sensitive))
|
|
|
882 (gtk-import-function void gnome_druid_set_show_finish
|
|
|
883 (GnomeDruid . druid)
|
|
|
884 (gboolean . show_finish))
|
|
|
885 (gtk-import-function void gnome_druid_prepend_page
|
|
|
886 (GnomeDruid . druid)
|
|
|
887 (GnomeDruidPage . page))
|
|
|
888 (gtk-import-function void gnome_druid_insert_page
|
|
|
889 (GnomeDruid . druid)
|
|
|
890 (GnomeDruidPage . back_page)
|
|
|
891 (GnomeDruidPage . page))
|
|
|
892 (gtk-import-function void gnome_druid_append_page
|
|
|
893 (GnomeDruid . druid)
|
|
|
894 (GnomeDruidPage . page))
|
|
|
895 (gtk-import-function void gnome_druid_set_page
|
|
|
896 (GnomeDruid . druid)
|
|
|
897 (GnomeDruidPage . page))
|
|
|
898
|
|
|
899 (gtk-import-function GtkType gnome_druid_page_get_type)
|
|
|
900 (gtk-import-function gboolean gnome_druid_page_next (GnomeDruidPage . druid_page))
|
|
|
901 (gtk-import-function gboolean gnome_druid_page_prepare (GnomeDruidPage . druid_page))
|
|
|
902 (gtk-import-function gboolean gnome_druid_page_back (GnomeDruidPage . druid_page))
|
|
|
903 (gtk-import-function gboolean gnome_druid_page_cancel (GnomeDruidPage . druid_page))
|
|
|
904 (gtk-import-function gboolean gnome_druid_page_finish (GnomeDruidPage . druid_page))
|
|
|
905
|
|
|
906
|
|
|
907 (gtk-import-function GtkType gnome_druid_page_start_get_type)
|
|
|
908 (gtk-import-function GtkWidget gnome_druid_page_start_new)
|
|
|
909
|
|
|
910 ;; #### BOGUS!
|
|
|
911 '(gtk-import-function GtkWidget gnome_druid_page_start_new_with_vals
|
|
|
912 (GtkString . title)
|
|
|
913 (GtkString . text)
|
|
|
914 (GdkImlibImage . logo)
|
|
|
915 (GdkImlibImage . watermark))
|
|
|
916
|
|
|
917 (gtk-import-function void gnome_druid_page_start_set_bg_color
|
|
|
918 (GnomeDruidPageStart . druid_page_start)
|
|
|
919 (GdkColor . color))
|
|
|
920 (gtk-import-function void gnome_druid_page_start_set_textbox_color
|
|
|
921 (GnomeDruidPageStart . druid_page_start)
|
|
|
922 (GdkColor . color))
|
|
|
923 (gtk-import-function void gnome_druid_page_start_set_logo_bg_color
|
|
|
924 (GnomeDruidPageStart . druid_page_start)
|
|
|
925 (GdkColor . color))
|
|
|
926 (gtk-import-function void gnome_druid_page_start_set_title_color
|
|
|
927 (GnomeDruidPageStart . druid_page_start)
|
|
|
928 (GdkColor . color))
|
|
|
929 (gtk-import-function void gnome_druid_page_start_set_text_color
|
|
|
930 (GnomeDruidPageStart . druid_page_start)
|
|
|
931 (GdkColor . color))
|
|
|
932 (gtk-import-function void gnome_druid_page_start_set_text
|
|
|
933 (GnomeDruidPageStart . druid_page_start)
|
|
|
934 (GtkString . text))
|
|
|
935 (gtk-import-function void gnome_druid_page_start_set_title
|
|
|
936 (GnomeDruidPageStart . druid_page_start)
|
|
|
937 (GtkString . title))
|
|
|
938
|
|
|
939 ;; #### BOGUS!
|
|
|
940 '(gtk-import-function void gnome_druid_page_start_set_logo
|
|
|
941 (GnomeDruidPageStart . druid_page_start)
|
|
|
942 (GdkImlibImage . logo_image))
|
|
|
943 ;; #### BOGUS!
|
|
|
944 '(gtk-import-function void gnome_druid_page_start_set_watermark
|
|
|
945 (GnomeDruidPageStart . druid_page_start)
|
|
|
946 (GdkImlibImage . watermark))
|
|
|
947
|
|
|
948
|
|
|
949 (gtk-import-function GtkType gnome_druid_page_standard_get_type)
|
|
|
950 (gtk-import-function GtkWidget gnome_druid_page_standard_new)
|
|
|
951 ;; #### BOGUS!
|
|
|
952 '(gtk-import-function GtkWidget gnome_druid_page_standard_new_with_vals
|
|
|
953 (GtkString . title)
|
|
|
954 (GdkImlibImage . logo))
|
|
|
955 (gtk-import-function void gnome_druid_page_standard_set_bg_color
|
|
|
956 (GnomeDruidPageStandard . druid_page_standard)
|
|
|
957 (GdkColor . color))
|
|
|
958 (gtk-import-function void gnome_druid_page_standard_set_logo_bg_color
|
|
|
959 (GnomeDruidPageStandard . druid_page_standard)
|
|
|
960 (GdkColor . color))
|
|
|
961 (gtk-import-function void gnome_druid_page_standard_set_title_color
|
|
|
962 (GnomeDruidPageStandard . druid_page_standard)
|
|
|
963 (GdkColor . color))
|
|
|
964 (gtk-import-function void gnome_druid_page_standard_set_title
|
|
|
965 (GnomeDruidPageStandard . druid_page_standard)
|
|
|
966 (GtkString . title))
|
|
|
967 ;; #### BOGUS!
|
|
|
968 '(gtk-import-function void gnome_druid_page_standard_set_logo
|
|
|
969 (GnomeDruidPageStandard . druid_page_standard)
|
|
|
970 (GdkImlibImage . logo_image))
|
|
|
971
|
|
|
972
|
|
|
973 (gtk-import-function GtkType gnome_druid_page_finish_get_type)
|
|
|
974 (gtk-import-function GtkWidget gnome_druid_page_finish_new)
|
|
|
975 (gtk-import-function GtkWidget gnome_druid_page_finish_new_with_vals
|
|
|
976 (GtkString . title)
|
|
|
977 (GtkString . text)
|
|
|
978 (GdkImlibImage . logo)
|
|
|
979 (GdkImlibImage . watermark))
|
|
|
980
|
|
|
981 (gtk-import-function void gnome_druid_page_finish_set_bg_color
|
|
|
982 (GnomeDruidPageFinish . druid_page_finish)
|
|
|
983 (GdkColor . color))
|
|
|
984 (gtk-import-function void gnome_druid_page_finish_set_textbox_color
|
|
|
985 (GnomeDruidPageFinish . druid_page_finish)
|
|
|
986 (GdkColor . color))
|
|
|
987 (gtk-import-function void gnome_druid_page_finish_set_logo_bg_color
|
|
|
988 (GnomeDruidPageFinish . druid_page_finish)
|
|
|
989 (GdkColor . color))
|
|
|
990 (gtk-import-function void gnome_druid_page_finish_set_title_color
|
|
|
991 (GnomeDruidPageFinish . druid_page_finish)
|
|
|
992 (GdkColor . color))
|
|
|
993 (gtk-import-function void gnome_druid_page_finish_set_text_color
|
|
|
994 (GnomeDruidPageFinish . druid_page_finish)
|
|
|
995 (GdkColor . color))
|
|
|
996 (gtk-import-function void gnome_druid_page_finish_set_text
|
|
|
997 (GnomeDruidPageFinish . druid_page_finish)
|
|
|
998 (GtkString . text))
|
|
|
999 (gtk-import-function void gnome_druid_page_finish_set_title
|
|
|
1000 (GnomeDruidPageFinish . druid_page_finish)
|
|
|
1001 (GtkString . title))
|
|
|
1002 ;; #### BOGUS!
|
|
|
1003 '(gtk-import-function void gnome_druid_page_finish_set_logo
|
|
|
1004 (GnomeDruidPageFinish . druid_page_finish)
|
|
|
1005 (GdkImlibImage . logo_image))
|
|
|
1006 ;; #### BOGUS!
|
|
|
1007 '(gtk-import-function void gnome_druid_page_finish_set_watermark
|
|
|
1008 (GnomeDruidPageFinish . druid_page_finish)
|
|
|
1009 (GdkImlibImage . watermark))
|
|
|
1010
|
|
|
1011 (provide 'gnome-widgets)
|
