diff options
| author | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2011-01-14 08:50:34 +0100 |
|---|---|---|
| committer | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2011-01-14 08:50:34 +0100 |
| commit | 6e7dc0e58fd2d7814934e0c041a4e18232102087 (patch) | |
| tree | 8da9e502a245704a8fda38748efe6d02e76be318 /src/Hakyll/Core/DirectedGraph/Internal.hs | |
| parent | 3ea3c52f535d3faaa930dfc4ef5812f0ef690ec3 (diff) | |
| download | hakyll-6e7dc0e58fd2d7814934e0c041a4e18232102087.tar.gz | |
Micro-cleanup
Diffstat (limited to 'src/Hakyll/Core/DirectedGraph/Internal.hs')
| -rw-r--r-- | src/Hakyll/Core/DirectedGraph/Internal.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Hakyll/Core/DirectedGraph/Internal.hs b/src/Hakyll/Core/DirectedGraph/Internal.hs index bc9cd92..5b02ad6 100644 --- a/src/Hakyll/Core/DirectedGraph/Internal.hs +++ b/src/Hakyll/Core/DirectedGraph/Internal.hs @@ -16,8 +16,8 @@ import qualified Data.Set as S -- | A node in the directed graph -- data Node a = Node - { nodeTag :: a -- ^ Tag identifying the node - , nodeNeighbours :: (Set a) -- ^ Edges starting at this node + { nodeTag :: a -- ^ Tag identifying the node + , nodeNeighbours :: Set a -- ^ Edges starting at this node } deriving (Show) -- | Append two nodes. Useful for joining graphs. |