From fc0afaaa273f5b5d3696df87d70d5347a13bb9ac Mon Sep 17 00:00:00 2001 From: Alexander Foremny Date: Mon, 18 Dec 2023 13:50:22 +0100 Subject: feat: compute history top to bottom Disables caching. --- app/Git/CommitHash.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'app/Git/CommitHash.hs') diff --git a/app/Git/CommitHash.hs b/app/Git/CommitHash.hs index 0caecf4..f791af8 100644 --- a/app/Git/CommitHash.hs +++ b/app/Git/CommitHash.hs @@ -15,7 +15,7 @@ import Render qualified as P data CommitHash = WorkingTree | Commit T.Text - deriving (Eq, Show, Binary, Generic) + deriving (Eq, Ord, Show, Binary, Generic) toShortText :: CommitHash -> Maybe T.Text toShortText = fmap (T.take 7) . toText -- cgit v1.2.3