From 77b9531fae4ad3b0d78f75e3c0e07a22333fbd73 Mon Sep 17 00:00:00 2001 From: Magnus Holm Date: Wed, 7 Sep 2011 11:04:25 +0200 Subject: [PATCH] Add test case for cycles --- t/tt_plugin_lite_app.t | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) diff --git a/t/tt_plugin_lite_app.t b/t/tt_plugin_lite_app.t index 29679ad..94ae154 100644 --- a/t/tt_plugin_lite_app.t +++ b/t/tt_plugin_lite_app.t @@ -36,4 +36,12 @@ my $t = Test::Mojo->new; # Simple TT template $t->get_ok('/')->status_is(200) - ->content_like(qr/test123456/); \ No newline at end of file + ->content_like(qr/test123456/); + +eval " + use Devel::Cycle 'find_cycle'; + find_cycle(app, sub { + ok(0, 'Cycle found'); + }); +"; +