aboutsummaryrefslogtreecommitdiffstats
path: root/app/Git
diff options
context:
space:
mode:
Diffstat (limited to 'app/Git')
-rw-r--r--app/Git/CommitHash.hs2
1 files changed, 1 insertions, 1 deletions
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