~ruther/guix-local: guix-package: Reduce start-up time for queries.

0f5378ebc4096b1d536f75c9867454215e8e06d6 — Ludovic Courtès 13 years ago dc2e4b0

guix-package: Reduce start-up time for queries.

* guix-package.in (guix-package): Call `open-connection' and
  `package-derivation' only after `process-query' has returned.

patch browse .tar.gz

1 files changed, 3 insertions(+), 3 deletions(-)

M guix-package.in

M guix-package.in => guix-package.in +3 -3

@@ 604,9 604,9 @@ Install, remove, or upgrade PACKAGES in a single transaction.\n"))
   (setvbuf (current-error-port) _IOLBF)
 
   (let ((opts (parse-options)))
-    (parameterize ((%store (open-connection)))
-      (with-error-handling
-        (or (process-query opts)
+    (or (process-query opts)
+        (parameterize ((%store (open-connection)))
+          (with-error-handling
             (parameterize ((%guile-for-build
                             (package-derivation (%store)
                                                 (if (assoc-ref opts 'bootstrap?)