mirror of
https://github.com/ChaosChemnitz/interfug15
synced 2025-06-28 13:36:07 +02:00
1d19edc231
Die zufälligen Farben sind dabei verloren gegangen - wenn ihr die wirklich wollt, bau ich sie wieder ein.
15 lines
354 B
Perl
15 lines
354 B
Perl
use strict;
|
|
use warnings;
|
|
|
|
use ChaosChemnitz::Interfug15::Webseite;
|
|
use Test::More tests => 2;
|
|
use Plack::Test;
|
|
use HTTP::Request::Common;
|
|
|
|
my $app = ChaosChemnitz::Interfug15::Webseite->to_app;
|
|
is( ref $app, 'CODE', 'Got app' );
|
|
|
|
my $test = Plack::Test->create($app);
|
|
my $res = $test->request( GET '/' );
|
|
|
|
ok( $res->is_success, '[GET /] successful' );
|