From 002cf4de32db979d515c2a9cdcd8c8f42859a797 Mon Sep 17 00:00:00 2001
From: Jasper Van der Jeugt <jaspervdj@gmail.com>
Date: Wed, 9 Feb 2011 18:11:24 +0100
Subject: Add hamlet templates and restructure tests

---
 tests/Hakyll/Core/DirectedGraph/Tests.hs | 12 ------------
 1 file changed, 12 deletions(-)

(limited to 'tests/Hakyll/Core/DirectedGraph')

diff --git a/tests/Hakyll/Core/DirectedGraph/Tests.hs b/tests/Hakyll/Core/DirectedGraph/Tests.hs
index 1a9b406..3e04b49 100644
--- a/tests/Hakyll/Core/DirectedGraph/Tests.hs
+++ b/tests/Hakyll/Core/DirectedGraph/Tests.hs
@@ -11,13 +11,10 @@ import Test.HUnit hiding (Test)
 
 import Hakyll.Core.DirectedGraph
 import Hakyll.Core.DirectedGraph.DependencySolver
-import Hakyll.Core.DirectedGraph.ObsoleteFilter
 
 tests :: [Test]
 tests =
     [ testCase "solveDependencies [1]" solveDependencies1
-    , testCase "filterObsolete [1]"    filterObsolete1
-    , testCase "filterObsolete [2]"    filterObsolete2
     ]
 
 node :: Ord a => a -> [a] -> (a, Set a)
@@ -37,12 +34,3 @@ solveDependencies1 =  result == [3, 4, 2, 6, 8] || result == [3, 4, 2, 6, 8]
                     @? "solveDependencies1"
   where
     result = solveDependencies testGraph01
-
-filterObsolete1 :: Assertion
-filterObsolete1 =  nodes (filterObsolete [6] testGraph01) == S.fromList [6, 8]
-                 @? "filterObsolete1"
-
-filterObsolete2 :: Assertion
-filterObsolete2 =
-    nodes (filterObsolete [4] testGraph01) == S.fromList [4, 2, 6, 8]
-        @? "filterObsolete2"
-- 
cgit v1.2.3