Mercurial > hg > xemacs-beta
view lisp/gnome.el @ 885:9a25b5ae3a51
[xemacs-hg @ 2002-06-27 22:50:25 by youngs]
2002-06-28 Steve Youngs <youngs@xemacs.org>
* inline.c: Include device-impl.h, extents-impl.h, frame-impl.h,
and objects-impl.h to pick up some error_check_* functions.
Remove console.h, extents.h, frame.h and objects.h because the
*-impl.h files include them.
author | youngs |
---|---|
date | Thu, 27 Jun 2002 22:50:29 +0000 (2002-06-27) |
parents | 7039e6323819 |
children | db7068430402 |
line wrap: on
line source
(globally-declare-fboundp '(gtk-type-from-name gtk-import-function-internal gtk-call-function)) (defvar gnome-init-called nil) (defun gnome-init (app-id app-version argv) (mapc 'dll-load '("libgnomesupport.so" "libgnome.so" "libgnomeui.so" "libesd.so" "libaudiofile.so" "libart_lgpl.so")) (if (and (not (noninteractive)) (not gnome-init-called) (= (gtk-type-from-name "GnomeApp") 0)) (prog1 (gtk-call-function (gtk-import-function-internal 'gint "gnome_init" '(GtkString GtkString gint GtkArrayOfString)) (list app-id app-version (length argv) argv)) (setq gnome-init-called t)))) (require 'gnome-widgets) (provide 'gnome)