From d695ede4e2498ff90f7eaf0417d7167b91d80fdc Mon Sep 17 00:00:00 2001
From: unknown_lamer <unknown>
Date: Thu, 23 Jun 2005 22:59:18 +0000
Subject: [PATCH] [project @ 2005-06-23 22:59:18 by unknown_lamer]

Made (bobotpp bot) actually work
---
 scripts/bot.scm | 3 ++-
 source/Interp.C | 1 +
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/scripts/bot.scm b/scripts/bot.scm
index 271f286..984c64a 100644
--- a/scripts/bot.scm
+++ b/scripts/bot.scm
@@ -7,4 +7,5 @@
 (define-module (bobotpp bot))
 
 (set-module-uses! %module-public-interface
-		  (list the-bot-module))
\ No newline at end of file
+		  (list (module-ref (resolve-module '(guile-user) #f)
+				    'the-bot-module)))
\ No newline at end of file
diff --git a/source/Interp.C b/source/Interp.C
index 5980d9a..c5c2fee 100644
--- a/source/Interp.C
+++ b/source/Interp.C
@@ -228,6 +228,7 @@ Interp::Startup()
 {
   bot_module = scm_c_define_module ("the-bot-module", 
 				    interp_init_helper, 0);
+
   scm_c_call_with_current_module (bot_module,
 				  interp_post_startup_helper,
 				  bot_module);
-- 
2.20.1