diff options
author | Ludovic Courtès <ludo@gnu.org> | 2018-07-03 00:01:20 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2018-07-03 00:39:11 +0200 |
commit | af2f8ae5f14d272d341148764d256792d8ef06aa (patch) | |
tree | 22f53a05972a7d7db9b675739a47c4156136d30f | |
parent | 71bf6cb700965cfe5b8f3661315017b022d0aca1 (diff) | |
download | guix-af2f8ae5f14d272d341148764d256792d8ef06aa.tar guix-af2f8ae5f14d272d341148764d256792d8ef06aa.tar.gz |
deduplication: Fix incorrect use of 'throw'.
* guix/store/deduplication.scm (get-temp-link): In handler, fix call to
'throw'.
-rw-r--r-- | guix/store/deduplication.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/store/deduplication.scm b/guix/store/deduplication.scm index d3139eb904..b1cd8873ae 100644 --- a/guix/store/deduplication.scm +++ b/guix/store/deduplication.scm @@ -88,7 +88,7 @@ LINK-PREFIX." (lambda args (if (= (system-error-errno args) EEXIST) (try (tempname-in link-prefix)) - (throw 'system-error args)))))) + (apply throw args)))))) ;; There are 3 main kinds of errors we can get from hardlinking: "Too many ;; things link to this" (EMLINK), "this link already exists" (EEXIST), and |