diff options
Diffstat (limited to 'app/Git/CommitHash.hs')
| -rw-r--r-- | app/Git/CommitHash.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/app/Git/CommitHash.hs b/app/Git/CommitHash.hs index c53e2d8..28aa738 100644 --- a/app/Git/CommitHash.hs +++ b/app/Git/CommitHash.hs @@ -27,8 +27,12 @@ toText (Commit hash) = Just hash toTextUnsafe :: CommitHash -> T.Text toTextUnsafe (Commit hash) = hash toTextUnsafe _ = error "toTextUnsafe: WorkingDir" +-- ^ REVIEW Why is this unsafe? +-- +-- REVIEW Because it is a partial function. +-- +-- RESOLVED --- REVIEW Why is this unsafe? instance P.Render CommitHash where render = P.render . P.Detailed |