From 641c61a966c5c7ea4c8cdc54ca0fa86fb9dcb319 Mon Sep 17 00:00:00 2001 From: Daniel Ehrenberg Date: Thu, 21 Feb 2008 16:11:35 -0600 Subject: [PATCH] change to decoded#stream-read1 --- core/io/encodings/encodings.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/core/io/encodings/encodings.factor b/core/io/encodings/encodings.factor index c1fd2c018c..5cb87da36f 100755 --- a/core/io/encodings/encodings.factor +++ b/core/io/encodings/encodings.factor @@ -113,7 +113,7 @@ M: decoded stream-read-until ] [ nip ] if ] [ nip ] if ; -M: decoded stream-read1 1 over stream-read ; +M: decoded stream-read1 1 swap stream-read ; M: decoded stream-readln ( stream -- str ) "\r\n" over stream-read-until handle-readln ;