From ec4b30eee7132fb64308b44c4effe391177254e2 Mon Sep 17 00:00:00 2001
From: Rob Rix <rob.rix@github.com>
Date: Mon, 14 Mar 2016 15:56:09 -0400
Subject: [PATCH] Rename the range to next indices function.

---
 src/Alignment.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Alignment.hs b/src/Alignment.hs
index d6edec287..28883119b 100644
--- a/src/Alignment.hs
+++ b/src/Alignment.hs
@@ -92,8 +92,8 @@ childLines sources child (followingLines, next) | or $ (>) . end <$> childRanges
   <> followingLines, start <$> childRanges)
   where pairWithNothing = fmap (fmap ((,) Nothing))
         placeChildAndRangeInContainer = fmap (fmap (first (Just . (<$ child))))
-        trailingContextLines = linesInRangeOfSource <$> rangeOfContextToNext <*> sources
-        rangeOfContextToNext = (Range <$> (end <$> childRanges) <*> next)
+        trailingContextLines = linesInRangeOfSource <$> rangeUntilNext <*> sources
+        rangeUntilNext = (Range <$> (end <$> childRanges) <*> next)
         childRanges = unionLineRangesFrom <$> (rangeAt <$> next) <*> sequenceA (copoint child)
 
 -- | Produce open/closed lines for the portion of the source spanned by a range.