From a4509a811554782e83f27c353f08cc759faac496 Mon Sep 17 00:00:00 2001
From: gwillen <gwillen@nerdnet.org>
Date: Fri, 5 Sep 2008 10:17:55 -0400
Subject: [PATCH] Accept a message argument to /instance.

darcs-hash:20080905141755-ebe41-0f4289786d5b53c1d65d93aa90c4346e4f9fa0c1.gz
---
 IrssiInterface.pl | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

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]);
 
-- 
2.50.1