* modules.c (scm_export): Inserted a return statement.

diff --git a/libguile/modules.c b/libguile/modules.c
index 52d054c..d54ac5f 100644 (file)
--- a/libguile/modules.c
+++ b/libguile/modules.c
@@ -187,8 +187,8 @@ static SCM module_export_x_var;
 static SCM
 scm_export (SCM module, SCM namelist)
 {
-  scm_call_2 (SCM_VARIABLE_REF (module_export_x_var),
-             module, namelist);
+  return scm_call_2 (SCM_VARIABLE_REF (module_export_x_var),
+                    module, namelist);
 }