From 5237c7ccc502f8c2b93550cf8e11f749a2884547 Mon Sep 17 00:00:00 2001 From: Rob Rix Date: Wed, 25 May 2016 10:43:24 -0400 Subject: [PATCH] Revert "Add a BranchAlignment type." This reverts commit c85b9fcca08b147c8f2c7bae573f7b30c08f14f4. --- test/AlignmentSpec.hs | 2 -- 1 file changed, 2 deletions(-) diff --git a/test/AlignmentSpec.hs b/test/AlignmentSpec.hs index 6314dd275..4f83aa988 100644 --- a/test/AlignmentSpec.hs +++ b/test/AlignmentSpec.hs @@ -192,8 +192,6 @@ data BranchElement | Margin (Join These String) deriving Show -data BranchAlignment = BranchAlignment { branchElements :: [BranchElement] } - branchElementContents :: BranchElement -> Join These String branchElementContents (Child _ contents) = contents branchElementContents (Margin contents) = contents