diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2015-07-24 01:17:19 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2015-07-24 01:19:57 +0200 |
| commit | ec2406efc7abc07dc21a60d7a1c15bdafc8e233b (patch) | |
| tree | 061461c0e27cb2aaa94027be301ad9e89791efa1 /gnu/build/vm.scm | |
| parent | e9ba6357e31935aaf75c02afaf3806d77e00b1fb (diff) | |
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.scm | 6 |
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 |