summaryrefslogtreecommitdiffstats
path: root/txr.c
diff options
context:
space:
mode:
Diffstat (limited to 'txr.c')
-rw-r--r--txr.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/txr.c b/txr.c
index da7869c7..4f09bf3e 100644
--- a/txr.c
+++ b/txr.c
@@ -817,6 +817,7 @@ int txr_main(int argc, char **argv)
if (wcscmp(c_str(spec_file), L"-") != 0) {
open_txr_file(spec_file, &txr_lisp_p, &spec_file_str, &parse_stream);
simulate_setuid_setgid(parse_stream);
+ set_get_symacro(self_load_path_s, spec_file_str);
} else {
drop_privilege();
spec_file_str = lit("stdin");
@@ -842,6 +843,7 @@ int txr_main(int argc, char **argv)
if (!equal(arg, lit("-"))) {
open_txr_file(arg, &txr_lisp_p, &spec_file_str, &parse_stream);
simulate_setuid_setgid(parse_stream);
+ set_get_symacro(self_load_path_s, spec_file_str);
} else {
drop_privilege();
spec_file_str = lit("stdin");