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