From 15bd294df1ef5042a1beddc8a464c1d50569fd58 Mon Sep 17 00:00:00 2001
From: Glenn Morris <rgm@gnu.org>
Date: Wed, 19 Sep 2007 07:52:30 +0000
Subject: (socks-open-network-stream): Signal an explicit error if the port
 associated with a service string can't be found.

---
 lisp/net/socks.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lisp/net/socks.el b/lisp/net/socks.el
index 5a2364c652..2c8b6dafed 100644
--- a/lisp/net/socks.el
+++ b/lisp/net/socks.el
@@ -546,7 +546,10 @@ version.")
 			  atype
 			  host
 			  (if (stringp service)
-			      (socks-find-services-entry service)
+			      (or
+			       (socks-find-services-entry service)
+			       (error "Unable to find port for service `%s'"
+				      service))
 			    service))
       (puthash 'buffer buffer info)
       (puthash 'host host info)
-- 
cgit v1.2.3