git.chise.org Git - chise/xemacs-chise.git.1/blob - lisp/gtk-extra.el

   1 ;;; gtk-extra.el --- Import `GTK+ Extra' widgets 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 ;; GTK+ Extra can be retrieved from http://magnet.fsu.edu/~feiguin/gtk
  30
  31 (eval-and-compile
  32   (require 'gtk-ffi))
  33
  34 ;;; gtkbordercombo.h
  35 (gtk-import-function GtkType gtk_border_combo_get_type)
  36 (gtk-import-function GtkWidget gtk_border_combo_new)
  37
  38 ;;; gtkcheckitem.h
  39 (gtk-import-function GtkType gtk_check_item_get_type)
  40 (gtk-import-function GtkWidget gtk_check_item_new)
  41 (gtk-import-function GtkWidget gtk_check_item_new_with_label
  42                      (GtkString . label))
  43
  44 ;;; gtkcolorcombo.h
  45 (gtk-import-function GtkType gtk_color_combo_get_type)
  46 (gtk-import-function GtkWidget gtk_color_combo_new)
  47 (gtk-import-function GtkWidget gtk_color_combo_new_with_values
  48                      (gint . nrows)
  49                      (gint . ncols)
  50                      (GtkArrayOfString . color_names))
  51 (gtk-import-function GtkString gtk_color_combo_get_color_at
  52                      (GtkColorCombo . combo)
  53                      (gint          . row)
  54                      (gint          . col))
  55 ;;;(gtk-import-function none gtk_color_combo_find_color
  56 ;;;                  (GtkColorCombo . combo)
  57 ;;;                  (GdkColor      . color)
  58 ;;;                  ((gint . out)  . row)
  59 ;;;                  ((gint . out)  . col))
  60
  61 ;;; gtkcombobox.h
  62 (gtk-import-function GtkType gtk_combobox_get_type)
  63 (gtk-import-function GtkWidget gtk_combobox_new)
  64 (gtk-import-function none gtk_combobox_hide_popdown_window)
  65
  66 ;;; gtkdirtree.h
  67 (gtk-import-function GtkType gtk_dir_tree_get_type)
  68 (gtk-import-function GtkWidget gtk_dir_tree_new)
  69 (gtk-import-function gint gtk_dir_tree_open_dir
  70                      (GtkDirTree . tree)
  71                      (GtkString  . path))
  72
  73 ;;; gtkfilelist.h
  74 (gtk-import-function GtkType gtk_file_list_get_type)
  75 (gtk-import-function GtkWidget gtk_file_list_new
  76                      (guint . icon_width)
  77                      (gint  . mode)
  78                      (GtkString . path))
  79 (gtk-import-function none gtk_file_list_set_filter
  80                      (GtkFileList . file_list)
  81                      (GtkString   . filter))
  82 (gtk-import-function none gtk_file_list_open_dir
  83                      (GtkFileList . file_list)
  84                      (GtkString   . path))
  85 (gtk-import-function GtkString gtk_file_list_get_path
  86                      (GtkFileList . file_list))
  87 (gtk-import-function GtkString gtk_file_list_get_filename
  88                      (GtkFileList . file_list))
  89
  90 ;;; gtkfontcombo.h
  91 (gtk-import-function GtkType gtk_font_combo_get_type)
  92 (gtk-import-function GtkWidget gtk_font_combo_new)
  93 (gtk-import-function none gtk_font_combo_select
  94                      (GtkFontCombo . font_combo)
  95                      (GtkString    . family)
  96                      (gboolean     . bold)
  97                      (gboolean     . italic)
  98                      (gint         . height))
  99 (gtk-import-function none gtk_font_combo_select_nth
 100                      (GtkFontCombo . font_combo)
 101                      (gint         . n)
 102                      (gboolean     . bold)
 103                      (gboolean     . italic)
 104                      (gint         . height))
 105
 106 ;;; gtkiconfilesel.h
 107 ;;; gtkiconlist.h
 108 ;;; gtkitementry.h
 109 ;;; gtkplot.h
 110 ;;; gtkplotcanvas.h
 111 ;;; gtkplotpc.h
 112 ;;; gtkplotprint.h
 113 ;;; gtkplotps.h
 114 ;;; gtkpsfont.h
 115 ;;; gtksheet.h
 116
 117 (provide 'gtk-extra)