summaryrefslogtreecommitdiff
path: root/gnu/installer
diff options
context:
space:
mode:
authorMathieu Othacehe <othacehe@gnu.org>2020-06-13 15:05:22 +0200
committerMathieu Othacehe <othacehe@gnu.org>2020-06-13 15:21:20 +0200
commit478d1270ce4029b7fe5bfbb369f8e35c57b32ab2 (patch)
treecc710c4c9df37afd69e5f25a7156ff47cd469921 /gnu/installer
parentf292d4719dead6a615187f325fbc0bb0e99d10b4 (diff)
install: final: Add some logging.
* gnu/installer/final.scm (umount-cow-store): Add some logging.
Diffstat (limited to 'gnu/installer')
-rw-r--r--gnu/installer/final.scm3
1 files changed, 3 insertions, 0 deletions
diff --git a/gnu/installer/final.scm b/gnu/installer/final.scm
index e06b104d59b..a742c2a0cd3 100644
--- a/gnu/installer/final.scm
+++ b/gnu/installer/final.scm
@@ -155,6 +155,8 @@ be much appreciated."
155 ;; restart it. 155 ;; restart it.
156 (restart-service 'guix-daemon) 156 (restart-service 'guix-daemon)
157 157
158 (syslog "Killing cow users.")
159
158 ;; Kill all processes started while the cow-store was active (logins 160 ;; Kill all processes started while the cow-store was active (logins
159 ;; on other TTYs for instance). 161 ;; on other TTYs for instance).
160 (kill-cow-users tmp-dir) 162 (kill-cow-users tmp-dir)
@@ -162,6 +164,7 @@ be much appreciated."
162 ;; Try to umount the store overlay. Some process such as udevd 164 ;; Try to umount the store overlay. Some process such as udevd
163 ;; workers might still be active, so do some retries. 165 ;; workers might still be active, so do some retries.
164 (let loop ((try 5)) 166 (let loop ((try 5))
167 (syslog "Umount try ~a~%" (- 5 try))
165 (sleep 1) 168 (sleep 1)
166 (let ((umounted? (false-if-exception (umount tmp-dir)))) 169 (let ((umounted? (false-if-exception (umount tmp-dir))))
167 (if (and (not umounted?) (> try 0)) 170 (if (and (not umounted?) (> try 0))