From f4bd8306687426861af453d513a2359b0912341e Mon Sep 17 00:00:00 2001 From: Dmitry Zuikov Date: Sat, 20 Apr 2024 02:52:13 +0300 Subject: [PATCH] make log clickable --- 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 c36b86cc..e53ffb65 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 @@ -112,7 +112,7 @@ rootPage content = do body_ do header_ do - div_ [class_ "header-title"] $ h1_ "hbs2-peer dashboard" + div_ [class_ "header-title"] $ h1_ [] $ a_ [href_ "/"] "hbs2-peer dashboard" content