aboutsummaryrefslogtreecommitdiff
path: root/idalius.pl
diff options
context:
space:
mode:
Diffstat (limited to 'idalius.pl')
-rwxr-xr-xidalius.pl10
1 files changed, 10 insertions, 0 deletions
diff --git a/idalius.pl b/idalius.pl
index ea276dd..c88ed8e 100755
--- a/idalius.pl
+++ b/idalius.pl
@@ -284,6 +284,16 @@ sub irc_msg {
$irc->yield(privmsg => $nick => "Syntax: action <channel> <action text>");
}
}
+ if ($what =~ /^topic\s/) {
+ my ($channel, $topic) = $what =~ /^topic\s+(\S+)\s(.*)?$/;
+ if ($channel) {
+ $topic = "" unless $topic;
+ $irc->yield(topic => $channel => $topic);
+ $irc->yield(privmsg => $nick => "Requested.");
+ } else {
+ $irc->yield(privmsg => $nick => "Syntax: topic <channel> <topic>");
+ }
+ }
if ($what =~ /^mode\s/) {
my ($rest) = $what =~ /^mode\s+(.*)?$/;
if ($rest) {