From 2befb534a17c45cc8d1a6541362efe0db421ca25 Mon Sep 17 00:00:00 2001
From: Daniel Barlow <dan@telent.net>
Date: Wed, 30 Oct 2024 21:17:26 +0000
Subject: [PATCH] use composition instead of lambda

---
 tests/UnitTest.hs | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/tests/UnitTest.hs b/tests/UnitTest.hs
index d6a1be1..2bdfa57 100644
--- a/tests/UnitTest.hs
+++ b/tests/UnitTest.hs
@@ -63,11 +63,10 @@ test1 =
   TestCase $
     either
       (assertFailure . displayException)
-      ( \t ->
-          assertEqual
-            "empty track has no elements"
-            0
-            (Track.length t)
+      ( assertEqual
+          "empty track has no elements"
+          0
+          . Track.length
       )
       (Track.parse (wrap ""))