diff --git a/guile/Makefile.am b/guile/Makefile.am index 08c495c0..319b0798 100644 --- a/guile/Makefile.am +++ b/guile/Makefile.am @@ -68,7 +68,7 @@ SUFFIXES = .x .doc # FIXME: GUILE_SITEDIR would be better, but that # breaks 'make distcheck' -scmdir=${prefix}/share/guile/site/2.0/ +scmdir=${prefix}/share/guile/site/2.2/ scm_DATA=mu.scm EXTRA_DIST=$(scm_DATA) diff --git a/guile/mu/Makefile.am b/guile/mu/Makefile.am index f4b8b875..f531822c 100644 --- a/guile/mu/Makefile.am +++ b/guile/mu/Makefile.am @@ -1,4 +1,4 @@ -## Copyright (C) 2008-2013 Dirk-Jan C. Binnema +## Copyright (C) 2008-2020 Dirk-Jan C. Binnema ## ## This program is free software; you can redistribute it and/or modify ## it under the terms of the GNU General Public License as published by @@ -18,7 +18,7 @@ include $(top_srcdir)/gtest.mk # FIXME: GUILE_SITEDIR would be better, but that # breaks 'make distcheck' -scmdir=${prefix}/share/guile/site/2.0/mu/ +scmdir=${prefix}/share/guile/site/2.2/mu/ scm_DATA= \ stats.scm \ diff --git a/lib/mu-script.c b/lib/mu-script.c index baf2a1fc..c5b167fb 100644 --- a/lib/mu-script.c +++ b/lib/mu-script.c @@ -318,7 +318,7 @@ mu_script_guile_run (MuScriptInfo *msi, const char *muhome, g_return_val_if_fail (muhome, FALSE); argv = g_new0 (char*, 6); - argv[0] = g_strdup("guile"); + argv[0] = g_strdup("guile2.2"); argv[1] = g_strdup("-l"); if (access (mu_script_info_path (msi), R_OK) != 0) { diff --git a/mu/mu-cmd-script.c b/mu/mu-cmd-script.c index f43a26d9..e1180c14 100644 --- a/mu/mu-cmd-script.c +++ b/mu/mu-cmd-script.c @@ -31,10 +31,13 @@ #include "mu-cmd.h" #include "mu-script.h" +#include "mu-runtime.h" + #include "utils/mu-util.h" #include "utils/mu-str.h" + #define MU_GUILE_EXT ".scm" #define MU_GUILE_DESCR_PREFIX ";; INFO: " @@ -192,7 +195,8 @@ mu_cmd_script (MuConfig *opts, GError **err) } /* do it! */ - mu_script_guile_run (msi, opts->muhome, opts->script_params, err); + mu_script_guile_run (msi, mu_runtime_path(MU_RUNTIME_PATH_CACHE), + opts->script_params, err); leave: /* this won't be reached, unless there is some error */ mu_script_info_list_destroy (scripts); diff --git a/mu/mu-config.c b/mu/mu-config.c index 8d354e0f..af98a372 100644 --- a/mu/mu-config.c +++ b/mu/mu-config.c @@ -83,7 +83,6 @@ set_group_mu_defaults (void) { /* If muhome is not set, we use the XDG Base Directory Specification * locations. */ - if (MU_CONFIG.muhome) expand_dir(MU_CONFIG.muhome);