From ea95a52a6b4d357a11698f8410e5f03d3f5a7c6f Mon Sep 17 00:00:00 2001 From: Dmitry Zuikov Date: Tue, 23 Apr 2024 11:53:35 +0300 Subject: [PATCH] wip --- hbs2-git/hbs2-git-dashboard/src/HBS2/Git/Web/Html/Root.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/hbs2-git/hbs2-git-dashboard/src/HBS2/Git/Web/Html/Root.hs b/hbs2-git/hbs2-git-dashboard/src/HBS2/Git/Web/Html/Root.hs index 2258cc06..0bd41697 100644 --- a/hbs2-git/hbs2-git-dashboard/src/HBS2/Git/Web/Html/Root.hs +++ b/hbs2-git/hbs2-git-dashboard/src/HBS2/Git/Web/Html/Root.hs @@ -608,7 +608,7 @@ repoCommit style lww hash = do tr_ do th_ [width_ "16rem"] $ strong_ "back" - td_ $ a_ [ href_ (toURL (RepoPage (CommitsTab Nothing) lww)) + td_ $ a_ [ href_ (toURL (RepoPage (CommitsTab (Just hash)) lww)) ] $ toHtml $ show $ pretty hash for_ au $ \author -> do