#use lib("../lib");
use HTML::Editor;
$ENV{HTTP_ACCEPT_LANGUAGE} = "de";
my %parameter = (
                 action    => 'action',
                 body      => 'body of the message',
                 class     => "min",
                 attach    => '1',
                 maxlength => '100',
                 path      => "blib/perl/templates",
                 reply     => '',
                 server    => "http://localhost",
                 style     => 'lze',
                 thread    => 'news',
                 title     => "&New Message",
                 html      => 1,
                 config    => "t/settings.pl",
);
my $editor = new HTML::Editor(\%parameter);
use Test::More tests => 1;
ok(length($editor->show()) > 0);