Mercurial > hg > scripts

comparison teh-lol.pl @ 2:34a80b4f5e34

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Modify the timestamp
author Jordi Gutiérrez Hermoso <jordigh@gmail.com>
date Mon, 10 Aug 2009 13:03:23 -0500
parents 25377c6b6550
children 6c34daa0afb0
comparison
equal deleted inserted replaced
0:25377c6b6550 2:34a80b4f5e34
22 sub check_lol { 22 sub check_lol {
23 my $chan = Xchat::get_info("channel"); 23 my $chan = Xchat::get_info("channel");
24 24
25 if ($_[0][1] =~ /\b(lo+l)\b/i) { 25 if ($_[0][1] =~ /\b(lo+l)\b/i) {
26 26
27 Xchat::command("say $1") if (time - $timestamp{$chan} > 60 or 27 Xchat::command("say $1") if (time - $timestamp{$chan} > 59 or
28 undef $timestamp{$chan} 28 undef $timestamp{$chan}
29 ); 29 );
30 $timestamp{$chan} = time; 30 $timestamp{$chan} = time;
31 } 31 }
32 return Xchat::EAT_NONE; 32 return Xchat::EAT_NONE;