* script.c (scm_compile_shell_switches): Define

use-emacs-interface in the root module, so the repl code can see
it.  See today's change to top-repl in ice-9/boot-9.scm.

diff --git a/libguile/script.c b/libguile/script.c
index aa6021f..9a65cfe 100644 (file)
--- a/libguile/script.c
+++ b/libguile/script.c
@@ -575,8 +575,10 @@ scm_compile_shell_switches (int argc, char **argv)
   scm_set_program_arguments (argc ? argc - i : 0, argv + i, argv0);
   
   /* If the --emacs switch was set, now is when we process it.  */
-  scm_sysintern ("use-emacs-interface",
-                (use_emacs_interface) ? SCM_BOOL_T : SCM_BOOL_F);
+  {
+    SCM vcell = scm_sysintern0_no_module_lookup ("use-emacs-interface");
+    SCM_SETCDR (vcell, use_emacs_interface ? SCM_BOOL_T : SCM_BOOL_F);
+  }
 
   /* Handle the `-e' switch, if it was specified.  */
   if (entry_point != SCM_EOL)