- Timestamp:
- 01/21/12 09:33:53 (4 months ago)
- File:
-
- 1 edited
-
trunk/plugins/en/complex_sucks.tcl (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/plugins/en/complex_sucks.tcl
r1084 r1134 21 21 if [regexp -nocase {([a-z0-9]+) (all )?suck[.!]*$} $text matches item] { 22 22 if {![regexp -nocase $stoplist $item]} { 23 if {($item == "I") || ($item == "i")} { 24 set item $nick 25 } 23 26 bMotionDoAction $channel $item "%VAR{sucks}" 24 27 return 1 … … 29 32 if [regexp -nocase $stoplist $item] { 30 33 return 0 34 } 35 if {($item == "I") || ($item == "i")} { 36 set item $nick 31 37 } 32 38 bMotionDoAction $channel $item "%VAR{sucks}"
Note: See TracChangeset
for help on using the changeset viewer.
