UI: Some template tweaks in cloth page

This commit is contained in:
fr33domlover 2022-09-27 18:12:05 +00:00
parent 84b70aa7b3
commit b1590ad44d

View file

@ -27,19 +27,19 @@ $maybe originRepo <- moriginRepo
<a href=@{RepoR repoHash}>
^#{keyHashidText repoHash} #{name}
$maybe branch <- maybeBranch
:
: #
<a href=@{RepoBranchSourceR repoHash branch []}>
#{branch}
$of Right (uRepo, maybeName, maybeBranch)
<a href="${uRepo}">
<a href="#{renderObjURI uRepo}">
$maybe name <- maybeName
#{name}
$nothing
<i>[unnamed]
$maybe (maybeURI, branch) <- maybeBranch
:
: #
$maybe uri <- maybeURI
<a href="${u}">
<a href="#{renderObjURI uri}">
#{branch}
$nothing
#{branch}