From: Glenn Morris <rgm@gnu.org>
Date: Wed, 19 Sep 2007 07:52:30 +0000 (+0000)
Subject: (socks-open-network-stream): Signal an explicit error if the port
X-Git-Tag: emacs-pretest-23.0.90~10843
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=15bd294df1ef5042a1beddc8a464c1d50569fd58;p=emacs.git

(socks-open-network-stream): Signal an explicit error if the port
associated with a service string can't be found.
---

diff --git a/lisp/net/socks.el b/lisp/net/socks.el
index 5a2364c652c..2c8b6dafed5 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)