ui: Make 'symlink' replacement more future-proof.
* guix/ui.scm (symlink): Change next-to-last 'throw' argument to explicitly ignore ARGS; change last argument to (list errno).
This commit is contained in:
parent
9b14107f2d
commit
6ec1f4caa3
|
@ -243,8 +243,8 @@ General help using GNU software: <http://www.gnu.org/gethelp/>"))
|
|||
;; information is missing as of Guile 2.0.11, making the exception
|
||||
;; uninformative.)
|
||||
(apply throw key proc "~A: ~S"
|
||||
(append args (list link))
|
||||
errno))))))
|
||||
(list (strerror (car errno)) link)
|
||||
(list errno)))))))
|
||||
|
||||
(set! copy-file
|
||||
;; Note: here we use 'set!', not #:replace, because UIs typically use
|
||||
|
|
Loading…
Reference in New Issue