aboutsummaryrefslogtreecommitdiff
path: root/gnu/build/vm.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2015-07-24 01:17:19 +0200
committerLudovic Courtès <ludo@gnu.org>2015-07-24 01:19:57 +0200
commitec2406efc7abc07dc21a60d7a1c15bdafc8e233b (patch)
tree061461c0e27cb2aaa94027be301ad9e89791efa1 /gnu/build/vm.scm
parente9ba6357e31935aaf75c02afaf3806d77e00b1fb (diff)
downloadgnu-guix-ec2406efc7abc07dc21a60d7a1c15bdafc8e233b.tar
gnu-guix-ec2406efc7abc07dc21a60d7a1c15bdafc8e233b.tar.gz
vm: Use the 'umount' procedure instead of util-linux's 'umount' command.
* gnu/build/vm.scm (initialize-root-partition, initialize-hard-disk): Use the 'umount' procedure instead of invoking the 'umount' command. * gnu/system/vm.scm (qemu-image): Remove UTIL-LINUX from INPUTS.
Diffstat (limited to 'gnu/build/vm.scm')
-rw-r--r--gnu/build/vm.scm6
1 files changed, 3 insertions, 3 deletions
diff --git a/gnu/build/vm.scm b/gnu/build/vm.scm
index 2c53cf5dd9..15c22a3e55 100644
--- a/gnu/build/vm.scm
+++ b/gnu/build/vm.scm
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2013, 2014 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2013, 2014, 2015 Ludovic Courtès <ludo@gnu.org>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -172,7 +172,7 @@ volume name."
(string-append "/xchg/" closure)))
closures)
(unless copy-closures?
- (system* "umount" target-store)))
+ (umount target-store)))
;; Add the non-store directories and files.
(display "populating...\n")
@@ -236,6 +236,6 @@ SYSTEM-DIRECTORY is the name of the directory of the 'system' derivation."
(unless register-closures?
(reset-timestamps target-directory))
- (zero? (system* "umount" target-directory)))
+ (umount target-directory))
;;; vm.scm ends here