[Pkg-ganeti-devel] [SCM] Ganeti packaging branch, master, updated. debian/2.5.2-1-10-g30ee08c
Iustin Pop
iustin at debian.org
Wed Feb 13 11:39:40 UTC 2013
The following commit has been merged in the master branch:
commit 748f439cbd21f3f0ed4aefb8338309e533259d69
Author: Iustin Pop <iustin at debian.org>
Date: Wed Feb 13 10:28:06 2013 +0100
Remove obsolete patch 'fix-old-style-imports'
This has already been integrated upstream in the 2.6 version.
Signed-off-by: Iustin Pop <iustin at debian.org>
diff --git a/debian/patches/fix-old-style-imports.patch b/debian/patches/fix-old-style-imports.patch
deleted file mode 100644
index eb77ebc..0000000
--- a/debian/patches/fix-old-style-imports.patch
+++ /dev/null
@@ -1,154 +0,0 @@
-Description: fix old-style Haskell imports
- Old-style imports (plain 'System') don't work anymore with GHC 7.4. Newer
- upstreams already fix this, but it hasn't been backported to 2.5.
-Author: Iustin Pop <iustin at debian.org>
-Forwarded: not-needed
-Last-Update: 2012-05-06
---- a/htools/Ganeti/HTools/CLI.hs
-+++ b/htools/Ganeti/HTools/CLI.hs
-@@ -83,7 +83,7 @@
- import System.Console.GetOpt
- import System.IO
- import System.Info
--import System
-+import System.Exit
- import Text.Printf (printf)
-
- import qualified Ganeti.HTools.Version as Version(version)
---- a/htools/Ganeti/HTools/ExtLoader.hs
-+++ b/htools/Ganeti/HTools/ExtLoader.hs
-@@ -37,7 +37,7 @@
- import Data.Maybe (isJust, fromJust)
- import System.FilePath
- import System.IO
--import System
-+import System.Exit
- import Text.Printf (hPrintf)
-
- import qualified Ganeti.HTools.Luxi as Luxi
---- a/htools/Ganeti/HTools/Program/Hspace.hs
-+++ b/htools/Ganeti/HTools/Program/Hspace.hs
-@@ -31,9 +31,9 @@
- import Data.List
- import Data.Maybe (isJust, fromJust)
- import Data.Ord (comparing)
--import System (exitWith, ExitCode(..))
-+import System.Exit (exitWith, ExitCode(..))
- import System.IO
--import qualified System
-+import System.Environment (getArgs)
-
- import Text.Printf (printf, hPrintf)
-
-@@ -347,7 +347,7 @@
- -- | Main function.
- main :: IO ()
- main = do
-- cmd_args <- System.getArgs
-+ cmd_args <- getArgs
- (opts, args) <- parseOpts cmd_args "hspace" options
-
- unless (null args) $ do
---- a/htools/htools.hs
-+++ b/htools/htools.hs
-@@ -26,7 +26,8 @@
- module Main (main) where
-
- import Data.Char (toLower)
--import System
-+import System.Environment
-+import System.Exit
- import System.IO
-
- import Ganeti.HTools.Utils
---- a/htools/Ganeti/HTools/Program/Hail.hs
-+++ b/htools/Ganeti/HTools/Program/Hail.hs
-@@ -27,7 +27,7 @@
-
- import Control.Monad
- import System.IO
--import qualified System
-+import System.Environment (getArgs)
-
- import qualified Ganeti.HTools.Cluster as Cluster
-
-@@ -51,7 +51,7 @@
- -- | Main function.
- main :: IO ()
- main = do
-- cmd_args <- System.getArgs
-+ cmd_args <- getArgs
- (opts, args) <- parseOpts cmd_args "hail" options
-
- let shownodes = optShowNodes opts
---- a/htools/Ganeti/HTools/Program/Hbal.hs
-+++ b/htools/Ganeti/HTools/Program/Hbal.hs
-@@ -31,11 +31,11 @@
- import Data.List
- import Data.Maybe (isJust, isNothing, fromJust)
- import Data.IORef
--import System (exitWith, ExitCode(..))
-+import System.Exit (exitWith, ExitCode(..))
- import System.IO
- import System.Posix.Process
- import System.Posix.Signals
--import qualified System
-+import System.Environment (getArgs)
-
- import Text.Printf (printf, hPrintf)
-
-@@ -227,7 +227,7 @@
- -- | Main function.
- main :: IO ()
- main = do
-- cmd_args <- System.getArgs
-+ cmd_args <- getArgs
- (opts, args) <- parseOpts cmd_args "hbal" options
-
- unless (null args) $ do
---- a/htools/Ganeti/HTools/Program/Hscan.hs
-+++ b/htools/Ganeti/HTools/Program/Hscan.hs
-@@ -27,10 +27,10 @@
-
- import Control.Monad
- import Data.Maybe (isJust, fromJust, fromMaybe)
--import System (exitWith, ExitCode(..))
-+import System.Exit (exitWith, ExitCode(..))
- import System.IO
- import System.FilePath
--import qualified System
-+import System.Environment (getArgs)
-
- import Text.Printf (printf)
-
-@@ -132,7 +132,7 @@
- -- | Main function.
- main :: IO ()
- main = do
-- cmd_args <- System.getArgs
-+ cmd_args <- getArgs
- (opts, clusters) <- parseOpts cmd_args "hscan" options
- let local = "LOCAL"
-
---- a/htools/Ganeti/HTools/IAlloc.hs
-+++ b/htools/Ganeti/HTools/IAlloc.hs
-@@ -34,7 +34,7 @@
- import Control.Monad
- import Text.JSON (JSObject, JSValue(JSArray),
- makeObj, encodeStrict, decodeStrict, fromJSObject, showJSON)
--import System (exitWith, ExitCode(..))
-+import System.Exit (exitWith, ExitCode(..))
- import System.IO
-
- import qualified Ganeti.HTools.Cluster as Cluster
---- a/htools/test.hs
-+++ b/htools/test.hs
-@@ -30,7 +30,7 @@
- import System.Console.GetOpt
- import System.IO
- import System.Exit
--import System (getArgs)
-+import System.Environment (getArgs)
- import Text.Printf
-
- import Ganeti.HTools.QC
diff --git a/debian/patches/series b/debian/patches/series
index f02b48b..9e4356f 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1,4 +1,3 @@
fix-startup-with-old-config.patch
cfgupgrade12-remove-old-ssconf.patch
-fix-old-style-imports.patch
fix-no-kvm.patch
--
Ganeti packaging
More information about the Pkg-ganeti-devel
mailing list