From 6f4612ccfca4d770c2e5f913a50624f5d4e9ed14 Mon Sep 17 00:00:00 2001
From: Lennart Kolmodin <kolmodin@gmail.com>
Date: Sat, 2 Feb 2019 01:08:20 -0800
Subject: [PATCH] Update src/Data/Binary/Class.hs
Co-Authored-By: harpocrates <alec.theriault@gmail.com>
---
src/Data/Binary/Class.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/Data/Binary/Class.hs b/src/Data/Binary/Class.hs
index 3bec014..42dfcdc 100644
--- a/src/Data/Binary/Class.hs
+++ b/src/Data/Binary/Class.hs
@@ -833,7 +833,7 @@ instance Binary a => Binary (NE.NonEmpty a) where
get = do
list <- get
case list of
- [] -> fail "NonEmpty is actually empty!"
+ [] -> fail "NonEmpty is empty!"
x:xs -> pure (x NE.:| xs)
put = put . NE.toList
#endif
--
GitLab