summaryrefslogtreecommitdiffstats
path: root/match.c
diff options
context:
space:
mode:
Diffstat (limited to 'match.c')
-rw-r--r--match.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/match.c b/match.c
index 15e98a08..0e70947b 100644
--- a/match.c
+++ b/match.c
@@ -683,9 +683,9 @@ obj_t *complex_snarf(fpip_t fp, obj_t *name)
{
switch (fp.close) {
case fpip_fclose:
- return lazy_stream_cons(make_stdio_stream(fp.f, t, nil));
+ return lazy_stream_cons(make_stdio_stream(fp.f, name, t, nil));
case fpip_pclose:
- return lazy_stream_cons(make_pipe_stream(fp.f, t, nil));
+ return lazy_stream_cons(make_pipe_stream(fp.f, name, t, nil));
case fpip_closedir:
return lazy_stream_cons(make_dir_stream(fp.d));
}