mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

bootstrap3 glyphicons

Browse source
This commit is contained in:
Sören Brunk 2014-04-18 01:58:27 +02:00
parent 23091cc318
commit d2b42c30ad
34 changed files with 71 additions and 71 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Assistant/WebApp/Gpg.hs
View file

@ -27,7 +27,7 @@ import qualified Data.Map as M
gpgKeyDisplay :: KeyId -> Maybe UserId -> Widget
gpgKeyDisplay keyid userid = [whamlet|
<span title="key id #{keyid}">
<i .icon-user></i> #
<span .glyphicon .glyphicon-user></span> #
$maybe name <- userid
#{name}
$nothing

2
Assistant/WebApp/SideBar.hs
View file

@ -106,4 +106,4 @@ htmlIcon UpgradeIcon = bootstrapIcon "arrow-up"
htmlIcon ConnectionIcon = bootstrapIcon "signal"
bootstrapIcon :: Text -> Widget
bootstrapIcon name = [whamlet|<i .icon-#{name}></i>|]
bootstrapIcon name = [whamlet|<span .glyphicon .glyphicon-#{name}></span>|]