# -*-perl-*-
# keitairc/lib/plugins/12keyword
# Keyword\8f\88\97\9d
-# $Id: 12keyword,v 1.2 2008-06-29 07:55:01 morimoto Exp $
+# $Id: 12keyword,v 1.3 2008-06-29 09:03:44 morimoto Exp $
# $Source: /home/ishikawa/work/keitairc/tmp/keitairc/lib/plugins/12keyword,v $
# The line number (1 incremented) and filename below must be
for my $keyword (split(',', $::cf->irc_keyword())){
$message =~ s|$keyword|<b>$keyword</b>|g;
}
-
- return sprintf('%s %s %s', $time, $nick, $message);
}
+ return sprintf('%s %s %s', $time, $nick, $message);
},
};