Implemented twiggy -v

miyagawa · Mar 28, 2010 · 40c2ad0 · 40c2ad0
1 parent c162a31
commit 40c2ad0
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/bin/twiggy b/bin/twiggy
@@ -3,7 +3,12 @@ use strict;
 use lib "lib";
 use Plack::Runner;
 
-my $runner = Plack::Runner->new(server => 'Twiggy', env => 'deployment');
+sub version {
+    require Twiggy;
+    print "Twiggy $Twiggy::VERSION\n";
+}
+
+my $runner = Plack::Runner->new(server => 'Twiggy', env => 'deployment', version_cb => \&version);
 $runner->parse_options(@ARGV);
 $runner->run;