~ruther/guix-local

0ca3d5568676937d65674415d292820668fce6a7 — Ludovic Courtès 8 years ago b612e54
store: Account for 'add-to-store' in RPC statistics.

* guix/store.scm (add-to-store): Add call to 'record-operation'.
1 files changed, 1 insertions(+), 0 deletions(-)

M guix/store.scm
M guix/store.scm => guix/store.scm +1 -0
@@ 897,6 897,7 @@ path."
                          #:key (select? true))
           ;; We don't use the 'operation' macro so we can pass SELECT? to
           ;; 'write-file'.
           (record-operation 'add-to-store)
           (let ((port (nix-server-socket server)))
             (write-int (operation-id add-to-store) port)
             (write-string basename port)