From: gwillen <gwillen@nerdnet.org>
Date: Fri, 5 Sep 2008 14:17:55 +0000 (-0400)
Subject: Accept a message argument to /instance.
X-Git-Url: https://hydra-www.ietfng.org/gitweb/?a=commitdiff_plain;h=a4509a811554782e83f27c353f08cc759faac496;p=instirc

Accept a message argument to /instance.

darcs-hash:20080905141755-ebe41-0f4289786d5b53c1d65d93aa90c4346e4f9fa0c1.gz
---

diff --git a/IrssiInterface.pl b/IrssiInterface.pl
index 5cae6fe..8541a29 100644
--- a/IrssiInterface.pl
+++ b/IrssiInterface.pl
@@ -423,16 +423,18 @@ sub cmd_common_startup ($$) {
 }
 
 sub cmd_instance {
-  my ($inst, $server, $witem) = @_;
+  my ($args, $server, $witem) = @_;
 
   return if not cmd_common_startup($server,$witem);
 
-  if ($inst eq "") {
+  if ($args eq "") {
     delete $$instance_labels{$$server{'address'}}{$$witem{'name'}};
     $witem->print("No longer using a default instance tag.");
     return;
   }
 
+  my ($inst, $msg) = split(/ /, $args, 2);
+
   my $enc = $hc->encode($inst);
   if (not defined $enc) {
     $witem->print("Can't set instance to '$inst'");
@@ -442,6 +444,10 @@ sub cmd_instance {
   $$instance_labels{$$server{'address'}}{$$witem{'name'}} = $enc;
 
   $witem->print("Default instance is now '$inst'.");
+
+  if ($msg ne "") {
+    cmd_inst_say($args, $server, $witem);
+  }
 }
 #Irssi::settings_set_str('current_instance', $_[0]);