diff options
-rw-r--r-- | libguile/modules.c | 3 |
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; |