From a69c9fb665459e2bfdbda1bf80741a0af31a7faf Mon Sep 17 00:00:00 2001 From: Bryan Newbold Date: Mon, 20 Feb 2017 00:06:40 -0800 Subject: New upstream version 3b5 --- lineio.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) mode change 100644 => 100755 lineio.scm (limited to 'lineio.scm') diff --git a/lineio.scm b/lineio.scm old mode 100644 new mode 100755 index 2b18cf2..c70ff6e --- a/lineio.scm +++ b/lineio.scm @@ -66,7 +66,7 @@ ;;which case it defaults to the value returned by ;;@code{current-input-port}. (define (write-line str . port) - (apply display str port) + (apply display (cons str port)) (apply newline port)) ;;@args command tmp -- cgit v1.2.3