From 27ff2eef890d86001c0210dd2d20639d34fbd32c Mon Sep 17 00:00:00 2001
From: Jasper Van der Jeugt <jaspervdj@gmail.com>
Date: Tue, 28 Dec 2010 11:12:45 +0100
Subject: Use Typeable instead of ADT

---
 src/Hakyll/Core/Target.hs | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

(limited to 'src/Hakyll/Core/Target.hs')

diff --git a/src/Hakyll/Core/Target.hs b/src/Hakyll/Core/Target.hs
index b8740bc..452fb57 100644
--- a/src/Hakyll/Core/Target.hs
+++ b/src/Hakyll/Core/Target.hs
@@ -4,7 +4,6 @@
 module Hakyll.Core.Target
     ( DependencyLookup
     , TargetM
-    , Target
     , runTarget
     , getIdentifier
     , getResourceString
@@ -20,12 +19,12 @@ import Hakyll.Core.ResourceProvider
 
 -- | Get the current identifier
 --
-getIdentifier :: TargetM a Identifier
+getIdentifier :: TargetM Identifier
 getIdentifier = TargetM $ targetIdentifier <$> ask
 
 -- | Get the resource content as a string
 --
-getResourceString :: TargetM a String
+getResourceString :: TargetM String
 getResourceString = TargetM $ do
     provider <- targetResourceProvider <$> ask
     identifier <- unTargetM getIdentifier
-- 
cgit v1.2.3