proc e:remspm {n u h type} {
    if {[e:isexempt $n $h $u]} {return}
    set ban [e:makeban $n $u]
    if {![string match $ban $::botname]} {
        newban $ban $::botnick [subst $::espam(Reason)] $::espam(BanLast)
    }
    foreach chan [channels] {
        if {[onchan $n $chan]} {
            e:bannick $ban $chan
            putkick $chan $n [subst $::espam(Reason)]
        }
    }
}

proc e:remspm {n u h type} {
    if {[e:isexempt $n $h $u]} {return}
    set ban [e:makeban $n $u]
    if {![string match $ban $::botname]} {
        newban $ban $::botnick [subst $::espam(Reason)] $::espam(BanLast)
    }
    foreach chan [channels] {
        if {[onchan $n $chan]} {
            putkick $chan $n [subst $::espam(Reason)]
            e:bannick $ban $chan
        }
    }
}