me
/
guix
Archived
1
0
Fork 0

store: Remove unused variable and 'socket' call.

* guix/store.scm (open-inet-socket): Remove unused 'sock' variable.
master
Ludovic Courtès 2022-09-03 18:44:32 +02:00
parent eedf71f948
commit 2028419e30
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 29 additions and 32 deletions

View File

@ -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