store: Remove unused variable and 'socket' call.
* guix/store.scm (open-inet-socket): Remove unused 'sock' variable.master
parent
eedf71f948
commit
2028419e30
|
@ -471,9 +471,6 @@
|
|||
(define (open-inet-socket host port)
|
||||
"Connect to the Unix-domain socket at HOST:PORT and return it. Raise a
|
||||
'&store-connection-error' upon error."
|
||||
(let ((sock (with-fluids ((%default-port-encoding #f))
|
||||
;; This trick allows use of the `scm_c_read' optimization.
|
||||
(socket PF_UNIX SOCK_STREAM 0))))
|
||||
(define addresses
|
||||
(getaddrinfo host
|
||||
(if (number? port) (number->string port) port)
|
||||
|
@ -505,7 +502,7 @@
|
|||
(raise (condition (&store-connection-error
|
||||
(file host)
|
||||
(errno (system-error-errno args)))))
|
||||
(loop rest))))))))))
|
||||
(loop rest)))))))))
|
||||
|
||||
(define (connect-to-daemon uri)
|
||||
"Connect to the daemon at URI, a string that may be an actual URI or a file
|
||||
|
|
Reference in New Issue