From 6073711643e68487a1c9f75a84061c5f52eb91c6 Mon Sep 17 00:00:00 2001
From: Matthew Barksdale <mattwb65@gmail.com>
Date: Thu, 20 Jan 2011 01:14:08 -0500
Subject: [PATCH 1/2] Added API::IRC::mode

---
 doc/CHANGELOG  | 2 ++
 src/API/IRC.pm | 9 ++++++++-
 2 files changed, 10 insertions(+), 1 deletion(-)

diff --git a/doc/CHANGELOG b/doc/CHANGELOG
index f028a4d..bee1f68 100644
--- a/doc/CHANGELOG
+++ b/doc/CHANGELOG
@@ -3,6 +3,8 @@ Auto IRC Bot 3.0: Change Log
 
 3.0 Indev
 ==================================================================
+    * Added mode subroutine to API::IRC.
+    * Added PASS support.
     * Bug fix: err() fatal errors now work. They didn't work
       due to bad regex.
     * Added an installation script.
diff --git a/src/API/IRC.pm b/src/API/IRC.pm
index 14b21c1..c407fcf 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);
+our @EXPORT_OK = qw(cjoin cpart mode);
 
 
 # Join a channel.
@@ -30,3 +30,10 @@ sub cpart {
 		Auto::socksnd($svr, "PART $chan :Leaving");
 	}
 }
+
+# Set a mode
+sub mode {
+	my ($svr, $chan, $modes) = @_;
+
+	Auto::socksnd($svr, "MODE $chan $modes");
+}

From fe6f4c3fe343fc7bab37ac518c0372bf6c54a33d Mon Sep 17 00:00:00 2001
From: Matthew Barksdale <mattwb65@gmail.com>
Date: Thu, 20 Jan 2011 01:17:55 -0500
Subject: [PATCH 2/2] I don't know if its me or git on drugs

---
 doc/CHANGELOG | 52 +++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 52 insertions(+)
 create mode 100644 doc/CHANGELOG

diff --git a/doc/CHANGELOG b/doc/CHANGELOG
new file mode 100644
index 0000000..bee1f68
--- /dev/null
+++ b/doc/CHANGELOG
@@ -0,0 +1,52 @@
+Auto IRC Bot 3.0: Change Log
+------------------------------------------------------------------
+
+3.0 Indev
+==================================================================
+    * Added mode subroutine to API::IRC.
+    * Added PASS support.
+    * Bug fix: err() fatal errors now work. They didn't work
+      due to bad regex.
+    * Added an installation script.
+    * Fork into the background if not in debug mode.
+    * Begin on API::IRC.
+    * Parse PING and Numeric:001.
+    * Begin on the IRC parser.
+    * Added sockets, support for multiple asynchronous sockets.
+    * Bug fix: conf_get() now returns correct data by checking
+      what type of reference the requested value is.
+    * Foundation completed.
+    * Added API function err()
+    * Added API function dbug()
+    * Added a debug mode.
+    * Old logs can now expire if set to do so in config.
+    * Added API function alog()
+    * Added API::Log::expire_logs()
+    * Added API function println()
+    * Use Mouse.
+    * Added contributor; Chazz "Alexandria" Wolcott.
+    * Gettext is no longer used.
+    * German translations. Contributed by Chazz "Alexandria" Wolcott.
+    * Converted English and French files to new format.
+    * Created a new method of translation.
+    * Use Exporter for the API functions.
+    * Added developer; Timothy Estes.
+    * Added developer; Russell Bradford.
+    * Require Perl 5.10.0 or higher.
+    * Removed developer; Russell Bradford.
+    * Renamed config value language to locale.
+    * Added an example config file.
+    * Added API function conf_get()
+    * Renamed API::Standard to API::Std
+    * Created a configuration file parser.
+    * New developer; Russell Bradford.
+    * Import the POSIX module.
+    * Fixed accent marks in French translation files.
+    * French translations.
+    * Added gettext compile script.
+    * Gettext English language files.
+    * New developer; Matthew Barksdale.
+    * Added documentation for the future Auto-Flatfile database 
+      format.
+    * Added a basic launcher.
+    * Finished standard documentation.