Tcl Library Source Code

Ticket Change Details

Artifact ID: a389756869145190163cb31c004e0cd5743f0899db418b97dd62f86a7a108755
Ticket: d9be31a488f644839811f7addf0da80f047f1a27
smtp::initialize fails with "<-- 421 4.3.2 Service not available"
User & Date: aku 2018-05-17 19:53:41

  1. Change assignee to "aku"
  2. Change icomment to:

    Comments in the code:

    indicate that ports should be matched to servers, i.e. indeed be iterated together.

    The increment at looks indeed to be much too late, what with the two `continue`s at and

    Moving the increment just after should work

    The proposed nested iteration will not match servers and ports as documented. It would try each port with each server, i.e do a cartesian product of both, like a SQL join.


    foreach server $options(-servers) $port $options(-ports) { ... }

    might do what we want, if it fills missing elements with the empty string when on of the lists is too short.

    That would avoid all the index calculations entirely.

  3. Change login to "aku"
  4. Change mimetype to "text/x-fossil-wiki"
  5. Change priority to "7 High"