nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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:
Ludovic Courtès 2015-05-24 17:29:14 +02:00
parent 9b14107f2d
commit 6ec1f4caa3
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
guix/ui.scm
View File

@ -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 ;; information is missing as of Guile 2.0.11, making the exception
;; uninformative.) ;; uninformative.)
(apply throw key proc "~A: ~S" (apply throw key proc "~A: ~S"
(append args (list link)) (list (strerror (car errno)) link)
errno)))))) (list errno)))))))
(set! copy-file (set! copy-file
;; Note: here we use 'set!', not #:replace, because UIs typically use ;; Note: here we use 'set!', not #:replace, because UIs typically use