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
======================
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.