Permalink
Browse files

Remove useless imports and variables.

  • Loading branch information...
1 parent 60a5406 commit 2d84418a33301daf2d6e04b421e4b1de6c827668 @jkarlson jkarlson committed Jul 9, 2010
Showing with 4 additions and 6 deletions.
  1. +1 −2 Cabal2Ebuild.hs
  2. +2 −3 DistroMap.hs
  3. +1 −1 Main.hs
View
@@ -32,8 +32,7 @@ import qualified Distribution.PackageDescription as Cabal
import qualified Distribution.Package as Cabal (PackageIdentifier(..)
, Dependency(..)
, PackageName(..))
-import qualified Distribution.Version as Cabal (VersionRange, foldVersionRange', versionBranch, Version)
-import qualified Distribution.License as Cabal (License(..))
+import qualified Distribution.Version as Cabal (VersionRange, foldVersionRange')
import Distribution.Text (display)
import Data.Char (toLower,isUpper)
View
@@ -47,20 +47,19 @@ import Data.Maybe ( fromJust )
import Distribution.Verbosity
import Distribution.Text ( display )
import Distribution.Client.Types ( Repo, AvailablePackageDb(..), AvailablePackage(..) )
-import Distribution.Simple.Utils ( warn, notice, info )
+import Distribution.Simple.Utils ( info )
import qualified Data.Version as Cabal
import qualified Distribution.Package as Cabal
import qualified Distribution.Client.PackageIndex as CabalInstall
import qualified Distribution.Client.IndexUtils as CabalInstall
-import Portage.Overlay ( Overlay(..), readOverlayByPackage, getDirectoryTree, DirectoryTree )
+import Portage.Overlay ( readOverlayByPackage, getDirectoryTree )
import qualified Portage.PackageId as Portage
import qualified Portage.Version as Portage
type PVU = (Cabal.PackageName, Cabal.Version, Maybe String)
type PVU_Map = Map Portage.PackageName [(Cabal.Version, Maybe String)]
-type PVU_Item = (Portage.PackageName, [(Cabal.Version, Maybe String)])
distroMap :: Verbosity -> Repo -> FilePath -> FilePath -> [String] -> IO ()
distroMap verbosity repo portagePath overlayPath args = do
View
@@ -11,7 +11,7 @@ import Data.Monoid
import Distribution.Simple.Setup
( Flag(..), fromFlag
, trueArg
- , flagToMaybe, flagToList
+ , flagToList
, optionVerbosity
)
import Distribution.PackageDescription.Configuration

0 comments on commit 2d84418

Please sign in to comment.