From 1f6f3198427519a246f42825a103c9e2feb874a8 Mon Sep 17 00:00:00 2001
From: Rob Rix <rob.rix@github.com>
Date: Tue, 8 Mar 2016 22:18:19 -0500
Subject: [PATCH] :fire: isClosedRowBy.

---
 src/Row.hs | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/src/Row.hs b/src/Row.hs
index a38befd76..cd4b017ba 100644
--- a/src/Row.hs
+++ b/src/Row.hs
@@ -21,9 +21,6 @@ unRight = snd . unRow
 isOpenRowBy :: Both (a -> Bool) -> Row a -> Bool
 isOpenRowBy f = runBothWith (&&) . (isOpenLineBy <$> f <*>) . unRow
 
-isClosedRowBy :: Both (a -> Bool) -> Row a -> Bool
-isClosedRowBy f = not . runBothWith (||) . (isOpenLineBy <$> f <*>) . unRow
-
 coalesceLinesBy :: (a -> Bool) -> Line a -> Line a -> [Line a]
 coalesceLinesBy f line nextLine | isOpenLineBy f line = [line <> nextLine]
 coalesceLinesBy _ line nextLine = [line, nextLine]