Munge the username to a proper email address before sending mail.

This commit is contained in:
terry%netscape.com 1998-07-27 20:57:51 +00:00
Родитель 8c30803b52
Коммит a3288e5006
1 изменённых файлов: 1 добавлений и 0 удалений

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

@ -215,6 +215,7 @@ foreach key [array names group] {
close $fid
set profile [GenerateProfileHTML $name]
set nextclose {[We don't remember close times any more...]}
set name [EmailFromUsername $name]
foreach k {name dir files log profile nextclose} {
regsub -all -- "%$k%" $text [set $k] text
}