summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--libguile/modules.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/modules.c b/libguile/modules.c
index f43a893b9..6e5d3413a 100644
--- a/libguile/modules.c
+++ b/libguile/modules.c
@@ -52,6 +52,7 @@
#include "libguile/hashtab.h"
#include "libguile/struct.h"
#include "libguile/variable.h"
+#include "libguile/fluids.h"
#include "libguile/modules.h"
@@ -69,7 +70,7 @@ static SCM the_module;
SCM
scm_selected_module ()
{
- return SCM_CDR (the_module);
+ return scm_fluid_ref (SCM_CDR (the_module));
}
static SCM set_current_module;