#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 );

