haskell: Combine tests to reduce number of launches.

[libguestfs.git] / haskell / Guestfs010Basic.hs

diff --git a/haskell/Guestfs050LVCreate.hs b/haskell/Guestfs010Basic.hs
similarity index 93%
rename from haskell/Guestfs050LVCreate.hs
rename to haskell/Guestfs010Basic.hs
index 502f6b2..6454d69 100644 (file)
--- a/haskell/Guestfs050LVCreate.hs
+++ b/haskell/Guestfs010Basic.hs
@@ -1,5 +1,5 @@
 {- libguestfs Haskell bindings
-   Copyright (C) 2009 Red Hat Inc.
+   Copyright (C) 2009-2010 Red Hat Inc.
 
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
@@ -16,7 +16,7 @@
    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 -}
 
-module Guestfs050LVCreate where
+module Guestfs010Basic where
 import qualified Guestfs
 import System.IO (openFile, hClose, hSetFileSize, IOMode(WriteMode))
 import System.Posix.Files (removeLink)
@@ -36,6 +36,4 @@ main = do
 
   -- Guestfs.lvs g and check returned list
 
-  Guestfs.sync g
-
   removeLink "test.img"