nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

store: Remove unused variable. 

* guix/store.scm (export-paths): Remove unused variable 's'.
This commit is contained in:
Ludovic Courtès 2015-01-17 16:03:35 +01:00
parent 5b3d863f00
commit 1d50699354
1 changed files with 8 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
guix/store.scm
View File

@ -806,15 +806,14 @@ PATHS---i.e., PATHS and all their dependencies."
sorted sorted
(filter (cut member <> paths) sorted)))) (filter (cut member <> paths) sorted))))
(let ((s (nix-server-socket server))) (let loop ((paths ordered))
(let loop ((paths ordered)) (match paths
(match paths (()
(() (write-int 0 port))
(write-int 0 port)) ((head tail ...)
((head tail ...) (write-int 1 port)
(write-int 1 port) (and (export-path server head port #:sign? sign?)
(and (export-path server head port #:sign? sign?) (loop tail))))))
(loop tail)))))))
(define* (register-path path (define* (register-path path
#:key (references '()) deriver prefix #:key (references '()) deriver prefix