diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 2000-08-11 08:44:32 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 2000-08-11 08:44:32 +0000 |
commit | b3138544efa48dfdf2bffc36415a4ac428afb13f (patch) | |
tree | b5cf117cbca3b9bb71014c00593926337d4bd281 /libguile/script.c | |
parent | b486ccc869a9c12df574a93f1c40726333383bcb (diff) | |
download | guile-b3138544efa48dfdf2bffc36415a4ac428afb13f.tar.gz |
* script.c (scm_shell): Pass scm_the_root_module () as second arg
to new scm_eval_x.
Diffstat (limited to 'libguile/script.c')
-rw-r--r-- | libguile/script.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/script.c b/libguile/script.c index 6e225f6e8..e24c89f51 100644 --- a/libguile/script.c +++ b/libguile/script.c @@ -644,7 +644,8 @@ scm_shell (int argc, char **argv) } } - exit (scm_exit_status (scm_eval_x (scm_compile_shell_switches (argc,argv)))); + exit (scm_exit_status (scm_eval_x (scm_compile_shell_switches (argc, argv), + scm_the_root_module ()))); } |