Change display of UAs per ZIP-316
This commit is contained in:
parent
e1262bf5f7
commit
a366d3a87b
1 changed files with 1 additions and 1 deletions
|
@ -33,7 +33,7 @@ displayZec s
|
||||||
|
|
||||||
-- | Helper function to display abbreviated Unified Address
|
-- | Helper function to display abbreviated Unified Address
|
||||||
showAddress :: UnifiedAddress -> T.Text
|
showAddress :: UnifiedAddress -> T.Text
|
||||||
showAddress u = T.take 8 t <> "..." <> T.takeEnd 8 t
|
showAddress u = T.take 20 t <> "..."
|
||||||
where
|
where
|
||||||
t = encodeUnifiedAddress u
|
t = encodeUnifiedAddress u
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue