egghelp/eggheads community

[pub_myaccess]: can't read "out": no such variable

2018-03-01T15:56:02-04:00

it works ! thanks alot by now my users can see where they have access. Thanks to all!

Statistics: Posted by mrleaW — Thu Mar 01, 2018 3:56 pm

[pub_myaccess]: can't read "out": no such variable

2018-03-01T09:04:16-04:00

Thanks Caesar. Fixed above.

Statistics: Posted by SpiKe^^ — Thu Mar 01, 2018 9:04 am

[pub_myaccess]: can't read "out": no such variable

2018-03-01T01:54:51-04:00

Psst! The pub bind is missing the command.

Statistics: Posted by caesar — Thu Mar 01, 2018 1:54 am

[pub_myaccess]: can't read "out": no such variable

2018-03-01T08:56:24-04:00

Try this slightly modified version of that proc and see what you get...

Code:

bind pub o|o !access pub_myaccessproc pub_myaccess {nick uhost hand chan arg} { set thehand [lindex [split [string trim $arg]] 0] if {$thehand eq ""} {  set thehand $hand  } if {![validuser $thehand]} {   puthelp "notice $nick :Invalid handle: $thehand"   return 0 } foreach c [channels] {   if {[set cinf [getchaninfo $thehand $c]] ne ""} {  set cinf " - $cinf"  }   if {[matchattr $thehand -|N $c]} {  lappend out "${c}:Owner$cinf"   } elseif {[matchattr $thehand -|C $c]} {  lappend out "${c}:Master$cinf"   } elseif {[matchattr $thehand -|M $c]} {  lappend out "${c}:Op$cinf"   } elseif {[matchattr $thehand -|O $c]} {  lappend out "${c}:Peon$cinf"   } elseif {[matchattr $thehand -|P $c]} {  lappend out "${c}:Friend$cinf"  } } if {[info exists out]} {   puthelp "notice $nick :Access list for \002$thehand\002."   foreach line $out {  puthelp "notice $nick :$line  } } else {  puthelp "notice $nick :No custom channel flags for \002$thehand\002."  }}

Statistics: Posted by SpiKe^^ — Wed Feb 28, 2018 2:08 pm

[pub_myaccess]: can't read "out": no such variable

2018-02-25T17:39:25-04:00

Code:

bind pub o|o pub_myaccessproc pub_myaccess {nick uhost hand chan arg} { set thehand [lindex $arg 0] if {$thehand == ""} {set thehand $hand} foreach c [channels] {  if {[matchattr $thehand -|N $chan] == 1} {lappend out [join "${c}:Owner [getchaninfo $thehand $chan]" " "]}  if {[matchattr $thehand -|C $chan] == 1 && [matchattr $thehand -|N $chan] != 1} {lappend out [join "${c}:Master [getchaninfo $thehand $chan]" " "]}  if {[matchattr $thehand -|M $chan] == 1 && [matchattr $thehand -|C $chan] != 1 && [matchattr $thehand -|n $chan] != 1} {lappend out [join "${c}:Op [getchaninfo $thehand $chan]" " "]}  if {[matchattr $thehand -|O $chan] == 1 && [matchattr $thehand -|M $chan] != 1 && [matchattr $thehand -|m $chan] != 1 && [matchattr $thehand -|N $chan] != 1} {lappend out [join "${c}:Peon [getchaninfo $thehand $chan]" " "]}  if {[matchattr $thehand -|P $chan] == 1 && [matchattr $thehand -|O $chan] != 1 && [matchattr $thehand -|o $chan] != 1 && [matchattr $thehand -|C $chan] != 1 && [matchattr $thehand -|N $chan] != 1} {lappend out [join "${c}:Friend [getchaninfo $hand $chan]" " "]}  }  if {$out == ""} {set $out "None."}  notice $nick "Access list for \002$thehand\002."  foreach line $out {   notice $nick "[split $line " "]"  }}

Statistics: Posted by mrleaW — Wed Feb 14, 2018 10:05 am