diff options
| author | Glenn Morris <[email protected]> | 2007-09-19 07:52:30 +0000 |
|---|---|---|
| committer | Glenn Morris <[email protected]> | 2007-09-19 07:52:30 +0000 |
| commit | 15bd294df1ef5042a1beddc8a464c1d50569fd58 (patch) | |
| tree | 388807f1d54d2174b5c194a3c6f8b7659dfa1ac9 | |
| parent | ff0a21d6673450ead9b10d64571ab268aaed0926 (diff) | |
(socks-open-network-stream): Signal an explicit error if the port
associated with a service string can't be found.
| -rw-r--r-- | lisp/net/socks.el | 5 |
1 files changed, 4 insertions, 1 deletions
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) |