This commit was manufactured by cvs2svn to create tag 'r21-4-22-chise-
[chise/xemacs-chise.git.1] / lisp / glade.el
1 ;;; glade.el --- Import libglade 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 (if glade was detected)
30
31 (eval-and-compile
32   (require 'gtk-ffi))
33
34 (gtk-import-function none glade_init)
35 (gtk-import-function none glade_gnome_init)
36 (gtk-import-function none glade_bonobo_init)
37 (gtk-import-function none glade_load_module (GtkString . module))
38 (gtk-import-function GtkType glade_xml_get_type)
39 (gtk-import-function GtkObject glade_xml_new
40                      (GtkString . filename)
41                      (GtkString . root))
42 (gtk-import-function GladeXML glade_xml_new_with_domain
43                      (GtkString . filename)
44                      (GtkString . root)
45                      (GtkString . domain))
46 (gtk-import-function GladeXML glade_xml_new_from_memory
47                      (GtkString . buffer)
48                      (gint      . size)
49                      (GtkString . root)
50                      (GtkString . domain))
51 (gtk-import-function gboolean glade_xml_construct
52                      (GladeXML . self)
53                      (GtkString . filename)
54                      (GtkString . root)
55                      (GtkString . domain))
56 (gtk-import-function GtkWidget glade_xml_get_widget
57                      (GladeXML . xml)
58                      (GtkString . name))
59 (gtk-import-function GtkWidget glade_xml_get_widget_by_long_name
60                      (GladeXML . xml)
61                      (GtkString . longname))
62
63 (gtk-import-function GtkString glade_get_widget_name (GtkWidget . widget))
64 (gtk-import-function GtkString glade_get_widget_long_name (GtkWidget . widget))
65 (gtk-import-function GladeXML glade_get_widget_tree (GtkWidget . widget))