home: symlink-manager: Allow busy device skip.
* gnu/home/services/symlink-manager.scm (update-symlinks-script): Allow busy device skip. Change-Id: Iff91c8a30309d25c02a8311d8d5ddbf54e90f5ad Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
parent
3378c1a9c6
commit
b1ec85533a
@ -2,6 +2,7 @@
|
||||
;;; Copyright © 2021 Andrew Tropin <andrew@trop.in>
|
||||
;;; Copyright © 2021 Xinglu Chen <public@yoctocell.xyz>
|
||||
;;; Copyright © 2022 Ludovic Courtès <ludo@gnu.org>
|
||||
;;; Copyright © 2024 Nicolas Graves <ngraves@ngraves.fr>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
@ -157,6 +158,12 @@ subdirectory from XDG_CONFIG_HOME to generate a target path."
|
||||
#t
|
||||
(G_ "Skipping ~a (not an empty directory)... done\n")
|
||||
directory))
|
||||
;; This happens when the directory is a mounted device.
|
||||
((= EBUSY errno)
|
||||
(format
|
||||
#t
|
||||
(G_ "Skipping ~a (underlying device is busy)... done\n")
|
||||
directory))
|
||||
((= ENOENT errno) #t)
|
||||
((= ENOTDIR errno) #t)
|
||||
(else
|
||||
|
Loading…
Reference in New Issue
Block a user