From fb87359d058e0810158019cbd958f60fcabcb9bd Mon Sep 17 00:00:00 2001 From: Mark H Weaver Date: Sat, 3 Nov 2012 23:11:46 -0400 Subject: [PATCH] Add ".guile.sls" and ".sls" to the default %load-extensions. * libguile/load.c (scm_init_load): Add ".guile.sls" and ".sls" to the default %load-extensions. --- libguile/load.c | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/libguile/load.c b/libguile/load.c index af2ca45..1a03a87 100644 --- a/libguile/load.c +++ b/libguile/load.c @@ -1031,7 +1031,9 @@ scm_init_load () scm_loc_load_path = SCM_VARIABLE_LOC (scm_c_define ("%load-path", SCM_EOL)); scm_loc_load_extensions = SCM_VARIABLE_LOC (scm_c_define ("%load-extensions", - scm_list_2 (scm_from_locale_string (".scm"), + scm_list_4 (scm_from_locale_string (".scm"), + scm_from_locale_string (".guile.sls"), + scm_from_locale_string (".sls"), scm_nullstr))); scm_loc_load_compiled_path = SCM_VARIABLE_LOC (scm_c_define ("%load-compiled-path", SCM_EOL)); -- 1.7.10.4