Smtp configuration

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
use "net"
use "email"
use "buffered"

class val SMTPConfiguration
  var mydomain: String val
  var destination: String val
  var port: String val
  var callback: {(Bool, EMail val, Reader iso): None} val

  new val create(mydomain': String val = "",
             destination': String val = "",
             port': String val = "",
             callback': {(Bool, EMail val, Reader iso): None} val = {(state: Bool, email: EMail val, sessionlog: Reader iso): None => None}) => None
    mydomain = mydomain'
    destination = destination'
    port = port'
    callback = callback'