HCoop
/
bpt
/
emacs.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
authors.el: Add some renamed/moved files
[bpt/emacs.git]
/
lisp
/
net
/
socks.el
diff --git
a/lisp/net/socks.el
b/lisp/net/socks.el
index
d6173e0
..
90ee20c
100644
(file)
--- a/
lisp/net/socks.el
+++ b/
lisp/net/socks.el
@@
-1,6
+1,6
@@
;;; socks.el --- A Socks v5 Client for Emacs
;;; socks.el --- A Socks v5 Client for Emacs
-;; Copyright (C) 1996-2000, 2002, 2007-201
3
Free Software Foundation,
+;; Copyright (C) 1996-2000, 2002, 2007-201
4
Free Software Foundation,
;; Inc.
;; Author: William M. Perry <wmperry@gnu.org>
;; Inc.
;; Author: William M. Perry <wmperry@gnu.org>
@@
-102,7
+102,7
@@
If PATTERN is omitted, it defaults to \"[ \\f\\t\\n\\r\\v]+\"."
;;; Customization support
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defgroup socks nil
;;; Customization support
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defgroup socks nil
- "SOCKS
Support
"
+ "SOCKS
support.
"
:version "22.2"
:prefix "socks-"
:group 'processes)
:version "22.2"
:prefix "socks-"
:group 'processes)
@@
-347,7
+347,7
@@
If PATTERN is omitted, it defaults to \"[ \\f\\t\\n\\r\\v]+\"."
;; could get a wrapper hook, or defer to open-network-stream-function.
(defvar socks-override-functions nil
;; could get a wrapper hook, or defer to open-network-stream-function.
(defvar socks-override-functions nil
- "Whether to overwrite the
open-network-stream
function with the SOCKSified
+ "Whether to overwrite the
`open-network-stream'
function with the SOCKSified
version.")
(require 'network-stream)
version.")
(require 'network-stream)
@@
-533,7
+533,7
@@
version.")
socks-tcp-services))))))
(defun socks-find-services-entry (service &optional udp)
socks-tcp-services))))))
(defun socks-find-services-entry (service &optional udp)
- "Return the port # associated with SERVICE"
+ "Return the port # associated with SERVICE
.
"
(if (= (hash-table-count socks-tcp-services) 0)
(socks-parse-services))
(gethash (downcase service)
(if (= (hash-table-count socks-tcp-services) 0)
(socks-parse-services))
(gethash (downcase service)