topic change

[LorT]

hi, i have this script

Code: Select all

set topicchan "#velug"

bind topc - * topicchange

proc topicchange {nick uhost handle channel topic} {
   global botnick topicchan
   set channel [string tolower $channel]
   if {($nick!=$botnick)&&($channel==$topicchan)} {
   topicmanager
   }
  }

proc topicmanager {} {
   global topicchan
   set topic [topic $topicchan]
   putserv "TOPIC $topicchan :\002www.linux.org.ve \002\0038|\003\00312|\003\0035|\003 $topic"
   }

it work fine, but there is some way that says who was the one that change the topic?

[LorT]

Code: Select all

set topicchan "#velug"

bind topc - * topicchange

proc topicchange {nick uhost handle channel topic} {
   global botnick topicchan
   set channel [string tolower $channel]
   if {($nick!=$botnick)&&($channel==$topicchan)} {
   set topic [topic $topicchan]
putserv"TOPIC$topicchan:\002www.linux.org.ve\002\0038|\003\00312|\003\0035|\003 $topic by $nick"
   }
  }