02/02: install: final: Add some logging.

[guix-commits]

mothacehe pushed a commit to branch master
in repository guix.

commit 478d1270ce4029b7fe5bfbb369f8e35c57b32ab2
Author: Mathieu Othacehe <othacehe@gnu.org>
AuthorDate: Sat Jun 13 15:05:22 2020 +0200

    install: final: Add some logging.
    
    * gnu/installer/final.scm (umount-cow-store): Add some logging.
---
 gnu/installer/final.scm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/gnu/installer/final.scm b/gnu/installer/final.scm
index e06b104..a742c2a 100644
--- a/gnu/installer/final.scm
+++ b/gnu/installer/final.scm
@@ -155,6 +155,8 @@ be much appreciated."
         ;; restart it.
         (restart-service 'guix-daemon)
 
+        (syslog "Killing cow users.")
+
         ;; Kill all processes started while the cow-store was active (logins
         ;; on other TTYs for instance).
         (kill-cow-users tmp-dir)
@@ -162,6 +164,7 @@ be much appreciated."
         ;; Try to umount the store overlay. Some process such as udevd
         ;; workers might still be active, so do some retries.
         (let loop ((try 5))
+          (syslog "Umount try ~a~%" (- 5 try))
           (sleep 1)
           (let ((umounted? (false-if-exception (umount tmp-dir))))
             (if (and (not umounted?) (> try 0))