Added umode() to API::Std.

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

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.