crash in latest guile-gnome
"gregory benison" <[email protected]>
| Newsgroups | gmane.lisp.guile.gtk |
|---|---|
| Message-ID | <[email protected]> |
In guile-gnome 2.15.95 or 2.15.96 (but not 2.15.92) -
If guile was configured with the '--disable-networking' option-
(use-modules (gnome gobject generics))
fails to load because the root module does not contain a binding for 'connect'.
I suggest the following patch -
--- generics.scm.orig 2007-12-10 20:46:51.000000000 -0800
+++ generics.scm 2007-12-10 20:46:25.000000000 -0800
@@ -138,11 +138,14 @@
"A shorthand for @code{gtype-instance-signal-emit}."
(apply gtype-instance-signal-emit object name args))
-(define %connect (module-ref the-root-module 'connect))
(define-generic-with-docs connect "")
-(define-method (connect . args)
- "The core Guile implementation of the connect(2) POSIX call"
- (apply %connect args))
+
+(if (module-defined? the-root-module 'connect)
+ (let ((%connect (module-ref the-root-module 'connect)))
+ (define-method (connect . args)
+ "The core Guile implementation of the connect(2) POSIX call"
+ (apply %connect args))))
+
(define-method (connect (object <gtype-instance>) (name <symbol>)
(func <procedure>))
"A shorthand for @code{gtype-instance-signal-connect}."
(gtype-instance-signal-connect object name func))
--
======================
Gregory Benison
Oregon State University
(541)-737-1876
gbenison at gmail dot com
======================