[noctool-cvs] CVS source

[imattsson]

Update of /project/noctool/cvsroot/source
In directory clnet:/tmp/cvs-serv12171

Modified Files:
	utils.lisp 
Log Message:
IM

Changed MAKE-TELNET to whatever it was before to something that should
work. If naught else, it removes some compile-time errors.


--- /project/noctool/cvsroot/source/utils.lisp	2008/05/16 20:26:08	1.5
+++ /project/noctool/cvsroot/source/utils.lisp	2008/05/18 10:54:44	1.6
@@ -26,7 +26,7 @@
     (add-graphs mon)))
 
 (defun make-telnet (host &optional (port 23))
-  (open-stream host port))
+  (socket-stream (socket-connect host port)))
 
 (defun read-until-eof (stream)
   (with-output-to-string (s)