Browse files

puthelp is no longer restricted to channels.

  • Loading branch information...
1 parent 9b0ac1a commit 2df8c9ebe8e3870f25b423da98013d99f89e72fc @blackwind blackwind committed Apr 16, 2012
Showing with 2 additions and 2 deletions.
  1. +2 −2 modules/modtcl/modtcl.tcl
View
4 modules/modtcl/modtcl.tcl
@@ -32,7 +32,7 @@ proc puthelp {text {option ""}} {
if {[regexp -nocase {^(?:privmsg|notice) (\S+) :(.*)} $text . target line]} {
if {$target == "*modtcl"} {PutModule $line; return}
if {$target == "*status"} {PutStatus $line; return}
- if {[botonchan $target]} {PutUser ":$::botnick![getchanhost $::botnick] $text"}
+ if {[string index $target 0] != "#" || [botonchan $target]} {PutUser ":$::botnick![getchanhost $::botnick] $text"}
}
PutIRC $text
}
@@ -83,7 +83,7 @@ proc botisvoice {{channel ""}} {return [isvoice $::botnick $channel]}
proc PermCheck {nick perm channel} {
if {$channel == ""} {set channel [channels]}
- if {[ModuleLoaded crypt]} {regsub {^¤} $nick {} nick}
+ if {[ModuleLoaded crypt]} {regsub {^} $nick {} nick}
foreach c $channel {
foreach u [GetChannelUsers $c] {
if {[string match -nocase $nick [lindex $u 0]] && [string match *$perm* [lindex $u 3]]} {

0 comments on commit 2df8c9e

Please sign in to comment.