diff options
author | Andy Wingo <wingo@pobox.com> | 2013-01-23 16:13:10 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2013-01-23 16:13:10 +0100 |
commit | 0683c24d323a30de0a44ec754a85af88a48586ea (patch) | |
tree | 3f1f0e79f8d7cd40682b0cf094629fe4868c300e | |
parent | 747bd5347d8b36c41809a16cb3f17b23e9afa9bf (diff) | |
parent | 8026a774a98acde5f9a692e97f38bf5ba6a317b3 (diff) | |
download | guile-0683c24d323a30de0a44ec754a85af88a48586ea.tar.gz |
Merge remote-tracking branch 'origin/stable-2.0'
-rw-r--r-- | module/ice-9/command-line.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/ice-9/command-line.scm b/module/ice-9/command-line.scm index 13274126b..9f8c9de88 100644 --- a/module/ice-9/command-line.scm +++ b/module/ice-9/command-line.scm @@ -184,7 +184,7 @@ If FILE begins with `-' the -s switch is mandatory. (define (load/lang f) (case (current-language) ((scheme) - (load f)) + (load-in-vicinity (getcwd) f)) (else ((module-ref (resolve-module '(system base compile)) 'compile-file) f #:to 'value)))) |