/usr/share/guile-gnome-2/gnome/gw/libglade.scm is in guile-gnome2-gtk 2.16.4-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 | ;; Generated by G-Wrap: an experimental Guile C API-wrapper engine.
;; Customized by guile-gnome; see (gnome gw support g-wrap) for details.
(define-module
(gnome gw libglade)
#:use-module
(oop goops)
#:use-module
(gnome gobject)
#:use-module
(gnome gw support modules)
#:use-module
(g-wrap gw standard)
#:use-module
(gnome gw glib)
#:use-module
(gnome gw gobject)
#:use-module
(gnome gw gtk))
(eval-when
(expand load eval)
(load-extension
"libgw-guile-gnome-libglade"
"gw_init_wrapset_gnome_libglade"))
(export-all-lazy!
'(glade-get-widget-tree
glade-get-widget-name
glade-xml-relative-file
glade-xml-get-widget
glade-xml-signal-autoconnect
glade-xml-signal-connect
glade-xml-new-from-buffer
glade-xml-get-widget-prefix
glade-xml-new
<glade-xml>))
(begin
(%gw:procedure->method-public
glade-xml-get-widget-prefix
'(<glade-xml> <string>)
'get-widget-prefix
2
#f))
(if (defined? '%generics)
(module-use!
(module-public-interface (current-module))
(module-public-interface %generics)))
|