From 37b31fc65a2e36f9cab0b143a1fd397822915137 Mon Sep 17 00:00:00 2001
From: mainzelm <mainzelm>
Date: Thu, 9 Oct 2003 16:51:10 +0000
Subject: [PATCH] Better error message for socket-connect

---
 scsh/network.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scsh/network.scm b/scsh/network.scm
index a44ed21..e0ee366 100644
--- a/scsh/network.scm
+++ b/scsh/network.scm
@@ -24,7 +24,7 @@
 					   (service-info (cadr args) "tcp")))
 					 (else
 					  (error
-					   "socket-connect: bad arg ~s"
+					   "socket-connect: bad port arg ~s"
 					   args)))))
 			(internet-address->socket-address host port)))
 		     ((= protocol-family