The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
JESSE / Jifty-0.70824 / t / TestApp / t / 08-notifications.t 
#!/usr/bin/env perl
use warnings;
use strict;

use lib 't/lib';
use Jifty::SubTest;

use Jifty::Test tests => 4;

use_ok('Jifty::Notification');
use_ok('Email::MIME::CreateHTML');
use_ok('Email::MIME');
use_ok('Email::Send');

my $html = "<html><body>This is the HTML portion of the test email</body></html>";

my $text = "This is the text portion of the text email";

my $test_email = Email::MIME->create_html(
					  header => [
						     From => 'test@test',
						     To => 'test2@test2',
						     Subject => 'This is a test email',
						     ],
					  body => $html,
					  text_body => $text
					  );



# TODO: {local $TODO = "Actually write tests"; ok(0, "Test notifications")};

1;