Fix GHC 9.10 warning

tbidne · Dec 7, 2024 · f421d10 · f421d10
1 parent 6409656
commit f421d10
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Running.hs b/src/Running.hs
@@ -45,7 +45,7 @@ calculateSomePace ::
   Duration t PDouble ->
   -- | Pace.
   SomePace PDouble
-calculateSomePace (MkSomeDistance @d sdist distance) duration =
+calculateSomePace (MkSomeDistance sdist distance) duration =
   case sdist of
     SMeter ->
       let distance' = Dist.convertDistance distance