[Bps-public-commit] r9308 - in Net-Server-IMAP: lib/Email lib/Net/Server/IMAP

[alexmv at bestpractical.com]

Author: alexmv
Date: Mon Oct 15 10:42:39 2007
New Revision: 9308

Removed:
   Net-Server-IMAP/MANIFEST.bak
   Net-Server-IMAP/Makefile
   Net-Server-IMAP/lib/Email/
Modified:
   Net-Server-IMAP/   (props changed)
   Net-Server-IMAP/MANIFEST
   Net-Server-IMAP/Makefile.PL
   Net-Server-IMAP/lib/Net/Server/IMAP/Mailbox.pm

Log:
 r23606 at zoq-fot-pik:  chmrr | 2007-10-15 10:40:56 -0400
  * Some unpushed changes from before


Modified: Net-Server-IMAP/MANIFEST
==============================================================================
--- Net-Server-IMAP/MANIFEST	(original)
+++ Net-Server-IMAP/MANIFEST	Mon Oct 15 10:42:39 2007
@@ -1,3 +1,5 @@
+certs/server-cert.pem
+certs/server-key.pem
 Changes
 inc/Module/Install.pm
 inc/Module/Install/Base.pm
@@ -7,18 +9,32 @@
 inc/Module/Install/Metadata.pm
 inc/Module/Install/Win32.pm
 inc/Module/Install/WriteAll.pm
-lib/Net/Server/.IMAP4.pm.swp
 lib/Net/Server/IMAP.pm
 lib/Net/Server/IMAP/Command.pm
 lib/Net/Server/IMAP/Command/Authenticate.pm
 lib/Net/Server/IMAP/Command/Capability.pm
+lib/Net/Server/IMAP/Command/Check.pm
+lib/Net/Server/IMAP/Command/Close.pm
+lib/Net/Server/IMAP/Command/Create.pm
+lib/Net/Server/IMAP/Command/Examine.pm
+lib/Net/Server/IMAP/Command/Expunge.pm
 lib/Net/Server/IMAP/Command/Fetch.pm
 lib/Net/Server/IMAP/Command/List.pm
 lib/Net/Server/IMAP/Command/Login.pm
 lib/Net/Server/IMAP/Command/Logout.pm
 lib/Net/Server/IMAP/Command/Lsub.pm
+lib/Net/Server/IMAP/Command/Noop.pm
 lib/Net/Server/IMAP/Command/Select.pm
+lib/Net/Server/IMAP/Command/Starttls.pm
+lib/Net/Server/IMAP/Command/Status.pm
+lib/Net/Server/IMAP/Command/Store.pm
+lib/Net/Server/IMAP/Command/Subscribe.pm
 lib/Net/Server/IMAP/Command/Uid.pm
+lib/Net/Server/IMAP/Connection.pm
+lib/Net/Server/IMAP/DefaultAuth.pm
+lib/Net/Server/IMAP/DefaultModel.pm
+lib/Net/Server/IMAP/Mailbox.pm
+lib/Net/Server/IMAP/Message.pm
 Makefile.PL
 MANIFEST			This list of files
 META.yml

Modified: Net-Server-IMAP/Makefile.PL
==============================================================================
--- Net-Server-IMAP/Makefile.PL	(original)
+++ Net-Server-IMAP/Makefile.PL	Mon Oct 15 10:42:39 2007
@@ -5,6 +5,16 @@
 version_from ('lib/Net/Server/IMAP.pm');
 abstract_from('lib/Net/Server/IMAP.pm');
 license('perl');
+
+requires('Class::Accessor');
+requires('Email::Address');
+requires('Email::MIME');
+requires('Email::MIME::ContentType');
+requires('Email::Simple' => 1.999);
+requires('IO::Socket');
+requires('IO::Socket::SSL');
+requires('MIME::Base64');
+requires('Regexp::Common');
 requires('Test::More');
 
 &WriteAll;

Modified: Net-Server-IMAP/lib/Net/Server/IMAP/Mailbox.pm
==============================================================================
--- Net-Server-IMAP/lib/Net/Server/IMAP/Mailbox.pm	(original)
+++ Net-Server-IMAP/lib/Net/Server/IMAP/Mailbox.pm	Mon Oct 15 10:42:39 2007
@@ -3,7 +3,6 @@
 use warnings;
 use strict;
 
-use Email::IMAPFolder;
 use Net::Server::IMAP::Message;
 use base 'Class::Accessor';
 
@@ -143,4 +142,15 @@
     return @ids;
 }
 
+package Email::IMAPFolder;
+use base 'Email::Folder';
+use YAML;
+
+sub bless_message {
+    my $self = shift;
+    my $message = shift || "";
+
+    return Net::Server::IMAP::Message->new($message);
+}
+
 1;