blob: 871c029c4f641689d03a7567f42b98bb5bfcea1c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
/- cnt=contact
/+ sigil=sigil-sigil, lib=boke
/+ lib=boke
|_ [u=@p =whoms:cnt avatar-size=@ud]
++ $ ^- [avatar=manx name=manx]
=/ ming (get-name:lib u)
=/ sig sigil(size avatar-size)
=/ sigl ?: (lth u (bex 64))
;div.avatar ;+ (sig u) ==
=/ random (random-avatar:lib (jam u))
;img.avatar@"{random}";
=/ nam ;div.name:"{ming}"
=/ prof (~(get by whoms) [%.y u])
?~ prof [sigl nam]
=/ avatar
=/ avatar-data (~(get by info.u.prof) %avatar)
?~ avatar-data sigl
?. ?=(%look -.u.avatar-data) sigl
;img.avatar@"{(trip +.u.avatar-data)}";
=/ name-div
=/ name-data (~(get by info.u.prof) %nickname)
?~ name-data nam
?. ?=(%text -.u.name-data) nam
;div.name:"{(trip +.u.name-data)}"
[avatar name-div]
--
|
