chaninfo problem

[xlmpq]

stiu ca s-a mai discutat pe la chaninfo tools cred problema asta dar mie ceva nu mi se pare in regula aici

proc pub:chaninfo {hand chan args x mix} {

	set info ""
	set what [lindex $args 0]

	if { $what == ""} { a:usage $x chaninfo ; return "FAILED: not all parameters specified"}
	switch -exact -- $what {
		-flood { 
	lappend info "flood-chan %b[channel get $chan flood-chan]%%,"
	lappend info "flood-ctcp %b[channel get $chan flood-ctcp]%%,"
	lappend info "flood-join %b[channel get $chan flood-join]%%,"
	lappend info "flood-kick %b[channel get $chan flood-kick]%%,"
	lappend info "flood-deop %b[channel get $chan flood-deop]%%,"
	lappend info "flood-nick %b[channel get $chan flood-nick]%%,"

	a:tell $x 17 "channel %b-flood%% settings: [join $info]" ; return "flood options"
	}

		-anti { 
	lappend info "[iif [channel get $chan antipub] + -]antipub,"
	lappend info "[iif [channel get $chan anticolour] + -]anticolour,"
	lappend info "[iif [channel get $chan antirepeat] + -]antirepeat,"
	lappend info "[iif [channel get $chan antinotice] + -]antinotice,"
	lappend info "[iif [channel get $chan antiunderline] + -]antiunderline,"
	lappend info "[iif [channel get $chan antibold] + -]antibold,"
	lappend info "[iif [channel get $chan antireverse] + -]antireverse,"
	lappend info "[iif [channel get $chan antiswear] + -]antiswear,"
	lappend info "[iif [channel get $chan antitake] + -]antitake,"
	lappend info "[iif [channel get $chan paranoia] + -]paranoia,"
      lappend info "[iif [channel get $chan strict] + -],"
      lappend info "[iif [channel get $chan mc.spamcheck] + -]mc.spamcheck,"
      lappend info "[iif [channel get $chan mc.spamcycle] + -]mc.spamcycle,"
        a:tell $x 17 "channel %b-anti%% settings: [join $info]" ; return "anti options"
}
	-info {
	set url [::stats::channel -get $chan url]
	set mail [::stats::channel -get $chan mail]
	set desc [::stats::channel -get $chan desc]
	set faq [::stats::channel -get $chan faq]
	set rules [::stats::channel -get $chan rules]
	set news [::stats::channel -get $chan news]
	set kiss [::stats::channel -get $chan kiss]
	set fuck [::stats::channel -get $chan fuck]
	set slap [::stats::channel -get $chan slap]
	if { $url == ""} { lappend info "url: %rOFF%%," } else {lappend info "url: %rON%%," }
	if { $mail == ""} { lappend info "mail: %rOFF%%," } else {lappend info "mail: %rON%%," }
	if { $desc == ""} { lappend info "desc: %rOFF%%," } else {lappend info "desc: %rON%%," }
	if { $faq == ""} { lappend info "faq: %rOFF%%," } else {lappend info "faq: %rON%%," }
	if { $rules == ""} { lappend info "rules: %rOFF%%," } else {lappend info "rules: %rON%%," }
	if { $news == ""} { lappend info "news: %rOFF%%," } else {lappend info "news: %rON%%," }
	if { $kiss == ""} { lappend info "kiss: %rOFF%%," } else {lappend info "kiss: %rON%%," }
	if { $fuck == ""} { lappend info "fuck: %rOFF%%," } else {lappend info "fuck: %rON%%," }
	if { $slap == ""} { lappend info "slap: %rOFF%%," } else {lappend info "slap: %rON%%," }

	a:tell $x 17 "channel %b-info%% settings: [join $info]"
}

       	-all {
    lappend info "modes %b[channel get $chan chanmode]%%,"
    lappend info "idle-kick %b[channel get $chan idle-kick]%%,"
    lappend info "revenge-mode %b[channel get $chan revenge-mode]%%,"
    lappend info "flood-chan %b[channel get $chan flood-chan]%%,"
    lappend info "flood-ctcp %b[channel get $chan flood-ctcp]%%,"
    lappend info "flood-join %b[channel get $chan flood-join]%%,"
    lappend info "flood-kick %b[channel get $chan flood-kick]%%,"
    lappend info "flood-deop %b[channel get $chan flood-deop]%%,"
    lappend info "flood-nick %b[channel get $chan flood-nick]%%,"
    lappend info "idle-deop %b[channel get $chan idle-deop]%%,"
    lappend info "aop-delay %b[channel get $chan aop-delay]%%,"
    lappend info "ban-time %b[channel get $chan ban-time]%%,"
    lappend info "exempt-time %b[channel get $chan exempt-time]%%,"
    lappend info "invite-time %b[channel get $chan invite-time ]%%,"

      a:tell $x 17 "[join $info] [join [lrange [channel info $chan] 19 27]]"
      a:tell $x 17 "[join [lrange [channel info $chan] 28 65]]"
      a:tell $x 17 "[join [lrange [channel info $chan] 66 99]]"
		}
	}
}

Asta imi este procesul de chaninfo din local_26 ( local_V )

Cand dau .chaninfo -info imi da urmatoarea eroare

 <Laren> [12:05] <<xlmpq>> xlmpq!steaua@xlmpq.users.undernet.org #testing CHANINFO invalid command name "::stats::channel"

Inca ceva .. PE vechiul a&a light pe care il aveam pe un alt eggdrop mergea fara nici o eroare acest cod , iar pe a&a light de la ultimul release imi da aceasta eroare la -info .. Cineva mi-a spus ca ii de la a&a_stats , dar nustiu ce sa fac pe acolo

[UniversaliA]

::stats::channel

inlocuiesti cu

::stats::stats:channel

[xlmpq]

yep , am reusit , facui comparatia din stats-ul de pe ultimul release si am vazut de ce nu mergea