From 92b6155a1c3a209936dddebb8bf3372ebee78f94 Mon Sep 17 00:00:00 2001
From: Drahflow <drahflow@gmx.de>
Date: Mon, 2 Sep 2013 11:27:01 +0200
Subject: I CAN HAZ TCP/IP CONNECTION!

Very crappy HTTP client:

"drahflow.name:80" net .tcp .connect "+" via
"GET / HTTP/1.0\n\n" +writeall
4096 +read dump
---
 compiler/standardClient.ey | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'compiler/standardClient.ey')

diff --git a/compiler/standardClient.ey b/compiler/standardClient.ey
index 940b974..3d93aa5 100644
--- a/compiler/standardClient.ey
+++ b/compiler/standardClient.ey
@@ -455,7 +455,9 @@
       } /eachLine deff
   > > -- } /makefile deff
 
-  |makefile /fdToFile sys .deff
+  {
+    RDWR 511 makefile
+  } /fdToFile sys .deff
 
   { # 0777 = 511
     1 neg RDONLY 511 makefile
-- 
cgit v1.2.3