Changeset 311


Ignore:
Timestamp:
09/29/03 09:55:09 (8 years ago)
Author:
kevdadrum
Message:

Really did what I claimed to last time

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/plugins/en/complex_questions.tcl

    r310 r311  
    2020 
    2121  regsub {(.+)[>\/]$} $text {\1?} text 
     22 
     23  bMotion_putloglev 3 * "Checking question for wellbeing" 
     24  ## wellbeing question targeted at me 
     25  if { [regexp -nocase "^$botnicks,?:? how( a|')?re (you|ya)" $text] || 
     26       [regexp -nocase "^how( a|')?re (you|ya).*$botnicks ?\\?" $text] || 
     27       [regexp -nocase "${botnicks}?:? ?(how('?s|z) it going|hoe gaat het|what'?s up|'?sup|how are you),?( ${botnicks})?\\?" $text]} { 
     28      bMotion_question_wellbeing $nick $channel $host 
     29      return 1 
     30  } 
     31     
    2232  bMotion_putloglev 3 * "Checking question for 'what'" 
    2333  ## What question targeted at me 
     
    3343  } 
    3444 
    35   bMotion_putloglev 3 * "Checking question for wellbeing" 
    36   ## wellbeing question targeted at me 
    37   if { [regexp -nocase "^$botnicks,?:? how( a|')?re (you|ya)" $text] || 
    38        [regexp -nocase "^how( a|')?re (you|ya).*$botnicks ?\\?" $text] || 
    39        [regexp -nocase "${botnicks}?:? ?(how('?s|z) it going|hoe gaat het|what'?s up|'?sup|how are you),?( ${botnicks})?\\?" $text]} { 
    40     bMotion_question_wellbeing $nick $channel $host 
    41     return 1 
    42   } 
     45 
    4346   
    4447     
Note: See TracChangeset for help on using the changeset viewer.