offload: Fix plural of some messages.

* guix/scripts/offload.scm (send-files): Use 'N_' for possibly plural
message.  Write "store item" instead of "store file".
(retrieve-files): Likewise.
This commit is contained in:
Ludovic Courtès 2016-12-05 23:25:29 +01:00
parent 1d48cf948c
commit e11c42f297
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 9 additions and 5 deletions

View File

@ -451,9 +451,11 @@ be read."
(with-store store (with-store store
(remove (cut valid-path? store <>) (remove (cut valid-path? store <>)
',files))))) ',files)))))
(count (length missing))
(port (store-import-channel session))) (port (store-import-channel session)))
(format #t (_ "sending ~a store files to '~a'...~%") (format #t (N_ "sending ~a store item to '~a'...~%"
(length missing) (session-get session 'host)) "sending ~a store items to '~a'...~%" count)
count (session-get session 'host))
;; Send MISSING in topological order. ;; Send MISSING in topological order.
(export-paths store missing port) (export-paths store missing port)
@ -472,9 +474,11 @@ be read."
"Retrieve FILES from SESSION's store, and import them." "Retrieve FILES from SESSION's store, and import them."
(let* ((session (channel-get-session (nix-server-socket remote))) (let* ((session (channel-get-session (nix-server-socket remote)))
(host (session-get session 'host)) (host (session-get session 'host))
(port (store-export-channel session files))) (port (store-export-channel session files))
(format #t (_ "retrieving ~a files from '~a'...~%") (count (length files)))
(length files) host) (format #t (N_ "retrieving ~a store item from '~a'...~%"
"retrieving ~a store items from '~a'...~%" count)
count host)
;; We cannot use the 'import-paths' RPC here because we already ;; We cannot use the 'import-paths' RPC here because we already
;; hold the locks for FILES. ;; hold the locks for FILES.