Changeset 269


Ignore:
Timestamp:
09/17/03 11:32:02 (8 years ago)
Author:
jamesoff
Message:

accept global +K flag as well as local

Location:
trunk/modules
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/modules/extra/jeffk.tcl

    r172 r269  
    11# $Id$ 
     2 
    23# 
    34 
    4 ############################################################################### 
    5 # This is a bMotion plugin 
    6 # Copyright (C) James Michael Seward 2000-2002 
    7 # 
    8 # This program is covered by the GPL, please refer the to LICENCE file in the 
    9 # distribution; further information can be found in the headers of the scripts 
    10 # in the modules directory. 
     5 
     6 
    117############################################################################### 
    128 
     9# This is a bMotion plugin 
     10 
     11# Copyright (C) James Michael Seward 2000-2002 
     12 
     13# 
     14 
     15# This program is covered by the GPL, please refer the to LICENCE file in the 
     16 
     17# distribution; further information can be found in the headers of the scripts 
     18 
     19# in the modules directory. 
     20 
     21############################################################################### 
     22 
     23 
     24 
    1325proc bMotion_module_extra_jeffk { line } { 
     26 
    1427 
    1528  set line [string map -nocase {"hello" "helko" "n\'t" "ant" "sy" "sey" "is" "si"} $line] 
    … …  
    1831  set line [string map -nocase {"name" "naem" "ll" "l" "ly" "ley"} $line] 
    1932  set line [string map -nocase {"ble" "bal" "word" "wrod" "inter" "intar" "lay" "alay" "luck" "luick" "here" "hear"} $line] 
    20   set line [string map {"!" "%REPEAT{2:5:!}%REPEAT{1:2:1}"} $line] 
    21   set line [string map {"?" "%REPEAT{2:5:?}%REPEAT{1:2:/}"} $line] 
     33  set line [string map {"!" "%REPEAT{2:5:!}"} $line] 
     34  set line [string map {"?" "%REPEAT{2:5:?}"} $line] 
    2235   
    2336  if {![rand 8]} { 

  • trunk/modules/output.tcl

    r266 r269  
    692692 
    693693    bMotion_putloglev 1 * "bMotion: checking $bot ($handle)" 
    694     if [matchattr [nick2hand $bot $channel] b&K $channel] { 
     694    if {[matchattr $handle bK] || [matchattr $handle b&K $channel]} { 
    695695      if {$conditions != ""} { 
    696696        if [string match -nocase [getuser $handle XTRA gender] $conditions] { 
Note: See TracChangeset for help on using the changeset viewer.