summaryrefslogtreecommitdiff
path: root/src/Propellor/Property/Sbuild.hs
diff options
context:
space:
mode:
authorSean Whitton2017-11-11 13:04:35 -0700
committerSean Whitton2017-11-11 13:04:35 -0700
commit4617ec3a1d97ffbe962cea41dba220818b438421 (patch)
treee4d84ec951ea9ec8569bb237a87cfa7ffd992ec3 /src/Propellor/Property/Sbuild.hs
parent0db6a2d1d8921dfae233feca19d7935f5c1423a5 (diff)
fix redundant imports & a redundant qualification
Diffstat (limited to 'src/Propellor/Property/Sbuild.hs')
-rw-r--r--src/Propellor/Property/Sbuild.hs4
1 files changed, 1 insertions, 3 deletions
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