HCoop
/
bpt
/
guile.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
faabd16
)
load files from the command line relative to the cwd
author
Andy Wingo
<wingo@pobox.com>
Wed, 23 Jan 2013 15:05:13 +0000
(16:05 +0100)
committer
Andy Wingo
<wingo@pobox.com>
Wed, 23 Jan 2013 15:05:13 +0000
(16:05 +0100)
* module/ice-9/command-line.scm (load/lang): Load files from the command
line relative to the current working directory (fixes regression).
module/ice-9/command-line.scm
patch
|
blob
|
blame
|
history
diff --git
a/module/ice-9/command-line.scm
b/module/ice-9/command-line.scm
index
1327412
..
9f8c9de
100644
(file)
--- 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))))