Mercurial > hg > xemacs-beta
annotate lisp/gnome-widgets.el @ 5461:568ec109e73d
Check types (unless `byte-compile-delete-errors' is t), #'char<, #'char=, etc.
src/ChangeLog addition:
2011-04-23 Aidan Kehoe <kehoea@parhasard.net>
* editfns.c:
* editfns.c (syms_of_editfns):
Implement #'char= in cl-extra.el, not here, accepting more than
two arguments as Common Lisp specifies.
lisp/ChangeLog addition:
2011-04-23 Aidan Kehoe <kehoea@parhasard.net>
* cl-extra.el (define-char-comparisons):
Add type-checking when the various character-specific comparison
predicates are used; don't check types if
byte-compile-delete-errors is non-nil at compile-time, instead use
the corresponding built-in numeric byte codes.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Sat, 23 Apr 2011 22:42:10 +0100 |
| parents | 3889ef128488 |
| children | 4dee0387b9de |
| rev | line source |
|---|---|
| 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 | |
|
5384
3889ef128488
Fix misspelled words, and some grammar, across the entire source tree.
Jerry James <james@xemacs.org>
parents:
502
diff
changeset
|
472 ;; If use_font_in_label is true, font name will be written using font chosen by user and |
| 462 | 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 | |
|
5384
3889ef128488
Fix misspelled words, and some grammar, across the entire source tree.
Jerry James <james@xemacs.org>
parents:
502
diff
changeset
|
729 ;; check for the existence of an entry. returns the entry if it |
| 462 | 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) |