00dani/lebd
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

Add a p-note to the h-card

Browse source
This commit is contained in:
Danielle McLean 2017-10-03 13:17:34 +11:00
parent e81a44d122
commit 208a46e346
Signed by: 00dani
GPG key ID: 3844A6973C6058F1
3 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
config/models
View file

@ -2,6 +2,7 @@ User
ident Text sqltype=varchar(255) ident Text sqltype=varchar(255)
fullName Text sqltype=varchar(500) fullName Text sqltype=varchar(500)
email Text sqltype=varchar(255) email Text sqltype=varchar(255)
note Text
password Text Maybe sqltype=varchar(255) default=NULL password Text Maybe sqltype=varchar(255) default=NULL
UniqueUser ident UniqueUser ident
deriving Typeable deriving Typeable

1
src/Foundation.hs
View file

@ -220,6 +220,7 @@ instance YesodAuth App where
{ userIdent = credsIdent creds { userIdent = credsIdent creds
, userFullName = "" , userFullName = ""
, userEmail = "" , userEmail = ""
, userNote = ""
, userPassword = Nothing , userPassword = Nothing
} }

1
templates/hcard.hamlet
View file

@ -3,6 +3,7 @@
<img .card-img-top.u-photo src=#{avatar} alt="Avatar for #{userFullName user}"> <img .card-img-top.u-photo src=#{avatar} alt="Avatar for #{userFullName user}">
<div .card-body> <div .card-body>
<h4 .card-title.p-name>#{userFullName user} <h4 .card-title.p-name>#{userFullName user}
<p .card-text.p-note .text-muted>#{userNote user}
<a .card-link.u-email rel="me" href="mailto:#{userEmail user}"> <a .card-link.u-email rel="me" href="mailto:#{userEmail user}">
<i .fa.fa-envelope> <i .fa.fa-envelope>
#{userEmail user} #{userEmail user}