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
|
mprToMetaUser entUser@Entity{entityVal = u} mpr = do
|
||||||
let userLang = userLanguages u >>= (listToMaybe . view _Wrapped) -- auch möglich `op Languages` statt `view _Wrapped`
|
let userLang = userLanguages u >>= (listToMaybe . view _Wrapped) -- auch möglich `op Languages` statt `view _Wrapped`
|
||||||
meta = mprToMeta mpr{ mppRecipient = userDisplayName u
|
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!
|
, mppLang = fromMaybe (mppLang mpr) userLang -- check if this is the desired behaviour!
|
||||||
}
|
}
|
||||||
userDate <- formatTimeUser SelFormatDate (mppDate mpr) (Just entUser)
|
userDate <- formatTimeUser SelFormatDate (mppDate mpr) (Just entUser)
|
||||||
|
|||||||
@ -133,7 +133,7 @@ $endif$
|
|||||||
\opening{$en-opening$}
|
\opening{$en-opening$}
|
||||||
$endif$
|
$endif$
|
||||||
|
|
||||||
\begin{textblock}{65}(88,234)%hpos,vpos
|
\begin{textblock}{65}(84,232)%hpos,vpos
|
||||||
\textcolor{black!33}{
|
\textcolor{black!33}{
|
||||||
\begin{labeling}{Login:x}
|
\begin{labeling}{Login:x}
|
||||||
\item[Login:] $login$
|
\item[Login:] $login$
|
||||||
|
|||||||
Reference in New Issue
Block a user