deduplication: Fix incorrect use of 'throw'.
* guix/store/deduplication.scm (get-temp-link): In handler, fix call to 'throw'.
This commit is contained in:
parent
71bf6cb700
commit
af2f8ae5f1
|
@ -88,7 +88,7 @@ LINK-PREFIX."
|
||||||
(lambda args
|
(lambda args
|
||||||
(if (= (system-error-errno args) EEXIST)
|
(if (= (system-error-errno args) EEXIST)
|
||||||
(try (tempname-in link-prefix))
|
(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
|
;; 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
|
;; things link to this" (EMLINK), "this link already exists" (EEXIST), and
|
||||||
|
|
Loading…
Reference in New Issue