From 359cdf5b24043cff4d56bf10759817caa95e9b8f Mon Sep 17 00:00:00 2001
From: Gabriele Lana <gabriele.lana@gmail.com>
Date: Mon, 23 Dec 2019 10:48:38 +0100
Subject: [PATCH] Swapped argument names (#289)

---
 src/Development/IDE/Spans/AtPoint.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Development/IDE/Spans/AtPoint.hs b/src/Development/IDE/Spans/AtPoint.hs
index fcb5b8b44c..dce7b1c911 100644
--- a/src/Development/IDE/Spans/AtPoint.hs
+++ b/src/Development/IDE/Spans/AtPoint.hs
@@ -55,8 +55,8 @@ atPoint
   -> [SpanInfo]
   -> Position
   -> Maybe (Maybe Range, [T.Text])
-atPoint IdeOptions{..} tcs pos srcSpans = do
-    firstSpan <- listToMaybe $ deEmpasizeGeneratedEqShow $ spansAtPoint srcSpans pos
+atPoint IdeOptions{..} tcs srcSpans pos = do
+    firstSpan <- listToMaybe $ deEmpasizeGeneratedEqShow $ spansAtPoint pos srcSpans
     return (Just (range firstSpan), hoverInfo firstSpan)
   where
     -- Hover info for types, classes, type variables