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
diff --git a/gnu/system/vm.scm b/gnu/system/vm.scm
index b293009127..eb27ebce3b 100644
--- a/gnu/system/vm.scm
+++ b/gnu/system/vm.scm
@@ -212,7 +212,7 @@ the image."
                     (guix build utils))
 
        (let ((inputs
-              '#$(append (list qemu parted grub e2fsprogs util-linux)
+              '#$(append (list qemu parted grub e2fsprogs)
                          (map canonical-package
                               (list sed grep coreutils findutils gawk))
                          (if register-closures? (list guix) '())))