blob: fe05275111d4a81c75d644f0ce79145ba32e562f (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
package Plack::Middleware::Debug::Dancer::Version;
use 5.008;
use strict;
use warnings;
use parent qw(Plack::Middleware::Debug::Base);
sub run {
my ( $self, $env, $panel ) = @_;
return sub {
$panel->nav_subtitle($Dancer::VERSION);
};
}
1;
|