From 4617ec3a1d97ffbe962cea41dba220818b438421 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sat, 11 Nov 2017 13:04:35 -0700 Subject: fix redundant imports & a redundant qualification --- src/Propellor/Property/Sbuild.hs | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'src/Propellor') diff --git a/src/Propellor/Property/Sbuild.hs b/src/Propellor/Property/Sbuild.hs index 50f5f046..2f5a1906 100644 --- a/src/Propellor/Property/Sbuild.hs +++ b/src/Propellor/Property/Sbuild.hs @@ -62,7 +62,6 @@ import Propellor.Base import Propellor.Types.Core import Propellor.Types.Info import Propellor.Property.Debootstrap (extractSuite) -import Propellor.Property.Chroot.Util import qualified Propellor.Property.Apt as Apt import qualified Propellor.Property.Ccache as Ccache import qualified Propellor.Property.Chroot as Chroot @@ -74,7 +73,6 @@ import qualified Propellor.Property.Schroot as Schroot import qualified Propellor.Property.Reboot as Reboot import qualified Propellor.Property.User as User import Utility.FileMode -import Utility.Split import Data.List @@ -95,7 +93,7 @@ built built cc ps = case schrootSystem ps of -- TODO should emit error and FailedChange Nothing -> doNothing doNothing - Just s@(System _ arch) -> case Debootstrap.extractSuite s of + Just s@(System _ arch) -> case extractSuite s of -- TODO should emit error and FailedChange Nothing -> doNothing doNothing Just suite -> built' cc ps suite -- cgit v1.2.3