summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Graves <ngraves@ngraves.fr>2024-02-04 03:19:57 +0100
committerLudovic Courtès <ludo@gnu.org>2024-02-19 18:43:32 +0100
commitb1ec85533a63c10616d9260f90411ca6f362de00 (patch)
treea1899e68601d47ce631dc576cf53e005e82f1a71
parent3378c1a9c65a9eb8ef13d7d738473e435cbbe3b6 (diff)
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>
-rw-r--r--gnu/home/services/symlink-manager.scm7
1 files changed, 7 insertions, 0 deletions
diff --git a/gnu/home/services/symlink-manager.scm b/gnu/home/services/symlink-manager.scm
index e4c931fbee..560e03a839 100644
--- a/gnu/home/services/symlink-manager.scm
+++ b/gnu/home/services/symlink-manager.scm
@@ -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