From aa8b8adf9492108580194a49fd98888a6dbc1909 Mon Sep 17 00:00:00 2001 From: Peter Bex Date: Tue, 2 Oct 2012 00:14:31 +0100 Subject: Implement <<-redirection --- tests/run.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'tests') diff --git a/tests/run.scm b/tests/run.scm index df73ac3..fbb1019 100644 --- a/tests/run.scm +++ b/tests/run.scm @@ -47,7 +47,7 @@ (test "Redirecting from object" '("blah" "foo" "testing, 1 2 3") - (run/strings (cat tmpfile -) (<< "testing, 1 2 3"))) + (run/strings (cat ,tmpfile -) (<< "testing, 1 2 3"))) (delete-file* tmpfile))) (test-group "Subprocesses" -- cgit v1.2.3