Tk Library Source Code

Artifact add67d7bf1ae3e5c39349f3c9b43f69e1ca9f0e4:

Attachment "diff_smtpd" to ticket [627960ffff] added by gionco 2002-10-24 18:54:28.

---

102d101
<         set options(myaddr) "$myaddr"
104,105d102
<     } else {
<         set options(myaddr) [info hostname]
164c161
<         puts $channel "220 $options(myaddr) tcllib smtpd $version; [timestamp]"
---
>         puts $channel "220 [info hostname] tcllib smtpd $version; [timestamp]"