Skip to content

Commit e0764e5

Browse files
committed
add export addOldDelta
1 parent 4256e7f commit e0764e5

File tree

1 file changed

+2
-1
lines changed

1 file changed

+2
-1
lines changed

ghcide/src/Development/IDE/Core/PositionMapping.hs

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -11,6 +11,7 @@ module Development.IDE.Core.PositionMapping
1111
, toCurrentPosition
1212
, PositionDelta(..)
1313
, addDelta
14+
, addOldDelta
1415
, idDelta
1516
, composeDelta
1617
, mkDelta
@@ -125,7 +126,7 @@ addDelta delta (PositionMapping pm) = PositionMapping (composeDelta delta pm)
125126

126127
-- | Add a old delta onto a Mapping k n to make a Mapping (k - 1) n
127128
addOldDelta :: PositionDelta -> PositionMapping -> PositionMapping
128-
addOldDelta delta (PositionMapping pm) = PositionMapping (composeDelta pm delta )
129+
addOldDelta delta (PositionMapping pm) = PositionMapping (composeDelta pm delta)
129130

130131
-- TODO: We currently ignore the right hand side (if there is only text), as
131132
-- that was what was done with lsp* 1.6 packages

0 commit comments

Comments
 (0)