chore(letter): adjust pin box position yet again
This commit is contained in:
parent
a2f18a2272
commit
d5214e49ab
@ -110,7 +110,7 @@ mprToMetaUser :: (MonadHandler m, HandlerSite m ~ UniWorX) => Entity User -> Met
|
||||
mprToMetaUser entUser@Entity{entityVal = u} mpr = do
|
||||
let userLang = userLanguages u >>= (listToMaybe . view _Wrapped) -- auch möglich `op Languages` statt `view _Wrapped`
|
||||
meta = mprToMeta mpr{ mppRecipient = userDisplayName u
|
||||
-- , mppAddress = --TODO once we have User addresses within the DB
|
||||
-- , mppAddress = userDisplayName u : html2textlines userAddress --TODO once we have User addresses within the DB
|
||||
, mppLang = fromMaybe (mppLang mpr) userLang -- check if this is the desired behaviour!
|
||||
}
|
||||
userDate <- formatTimeUser SelFormatDate (mppDate mpr) (Just entUser)
|
||||
|
||||
@ -133,7 +133,7 @@ $endif$
|
||||
\opening{$en-opening$}
|
||||
$endif$
|
||||
|
||||
\begin{textblock}{65}(88,234)%hpos,vpos
|
||||
\begin{textblock}{65}(84,232)%hpos,vpos
|
||||
\textcolor{black!33}{
|
||||
\begin{labeling}{Login:x}
|
||||
\item[Login:] $login$
|
||||
|
||||
Loading…
Reference in New Issue
Block a user