Expand email addresses properly when sending tree opened, tree closed notices.

This commit is contained in:
terry%netscape.com 1998-07-27 21:10:16 +00:00
Родитель a591826942
Коммит 084933821d
1 изменённых файлов: 6 добавлений и 1 удалений

Просмотреть файл

@ -58,7 +58,12 @@ proc MakeHookList {} {
set people($info(person)) 1
}
return [lsort [array names people]]
set addrs {}
foreach i [array names people] {
lappend addrs [EmailFromUsername $i]
}
return $addrs
}