From d115085df13e758734ffc7f1553f55bdd8ecafbb Mon Sep 17 00:00:00 2001
From: Elijah Perrault <elijah@starcoder.info>
Date: Fri, 21 Jan 2011 19:07:02 -0700
Subject: [PATCH] Added umode() to API::Std.

---
 doc/CHANGELOG  | 1 +
 src/API/IRC.pm | 4 ++--
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/doc/CHANGELOG b/doc/CHANGELOG
index 6b273b5..736da0e 100644
--- a/doc/CHANGELOG
+++ b/doc/CHANGELOG
@@ -3,6 +3,7 @@ Auto IRC Bot 3.0: Change Log
 
 3.0 Indev
 ==================================================================
+    * Added umode() to API::Std.
     * Added events on_ucjoin, on_rcjoin and on_nick.
     * Parse numerics 465, 471-475 and 477.
     * Added an optional @args onto event_run() for sending @args
diff --git a/src/API/IRC.pm b/src/API/IRC.pm
index c00260a..c36858d 100644
--- a/src/API/IRC.pm
+++ b/src/API/IRC.pm
@@ -9,7 +9,7 @@ use warnings;
 use Exporter;
 
 our @ISA       = qw(Exporter);
-our @EXPORT_OK = qw(cjoin cpart cmode privmsg notice quit nick usrc);
+our @EXPORT_OK = qw(cjoin cpart cmode umode privmsg notice quit nick usrc);
 
 
 # Join a channel.
@@ -46,7 +46,7 @@ sub umode
 {
 	my ($svr, $modes) = @_;
 	
-	
+	Auto::socksnd($svr, "MODE ".$Parser::IRC::botnick{$svr}." $modes");
 } 
 
 # Send a PRIVMSG.