egghelp.org community

[AW]

Hi, i am trying to write a scripts add ($handle $date) to the bans reason, so baned person can see who set a ban on him/her.
i am able to set this at the end of reason like Z was kicked by eggdrop(banned: reason May09 AW), but i was trying to set in the begining like
z was kicked by eggdrop(May09 AW: reason), i have tried my best, but couldn't figure out, i will appreciate for your kind help
regards
AW

bind dcc o|o +ban ban:+ban

proc ban:+ban {handle idx arg} {
if {$arg == ""} {
*dcc:+ban $handle $idx $arg
return 0
}
set date [clock format [clock seconds] - format "%b %d"]

*dcc:+ban $handle $idx "$arg ,$date $handle"
}