(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 5a2364c652c4b848a5f322cee105668b0b9828fd..2c8b6dafed5f1dfc3dac238a9ffc68951cad46a4 100644 (file)
--- 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)