diff --git a/src/gap_map.sml b/src/gap_map.sml
index d3f8c4b..ad9a8ca 100644
--- a/src/gap_map.sml
+++ b/src/gap_map.sml
@@ -485,11 +485,11 @@ struct
         let
           val rfirst = Vector.sub (hd, 0)
         in
-          if Fn.g (new, rfirst) then 
+          if Fn.g (new, rfirst) then
             insRight (newKey, newVal, leftKeys, leftVals, rightKeys, rightVals)
-          else if Fn.l (new, rfirst) then 
+          else if Fn.l (new, rfirst) then
             insLeft (newKey, newVal, leftKeys, leftVals, rightKeys, rightVals)
-          else 
+          else
             map
         end
     | [] => insLeft (newKey, newVal, leftKeys, leftVals, rightKeys, rightVals)