From 4881c6753ad272f6302605c69f1f8f829c2db7c9 Mon Sep 17 00:00:00 2001
From: Tim Emiola <adetokunbo@users.noreply.github.com>
Date: Mon, 5 Feb 2024 18:47:52 +0900
Subject: [PATCH] Avoid Data.List.singleton (to avoid CPP for 8.10.7)

---
 src/System/MemInfo/Print.hs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/System/MemInfo/Print.hs b/src/System/MemInfo/Print.hs
index 96942f6..d48e284 100644
--- a/src/System/MemInfo/Print.hs
+++ b/src/System/MemInfo/Print.hs
@@ -18,7 +18,6 @@ module System.MemInfo.Print (
   styleOutput,
 ) where
 
-import Data.List (singleton)
 import qualified Data.Text as Text
 import Fmt (
   build,
@@ -212,4 +211,4 @@ outputOf isAccurate style usages =
    in case overall of
         Nothing -> headerAndRows
         Just _ | not isAccurate -> headerAndRows
-        Just o -> headerAndRows <> singleton o
+        Just o -> headerAndRows <> [o]