--- trunk/lib/Frey/Web.pm 2008/11/20 15:23:13 482 +++ trunk/lib/Frey/Web.pm 2008/11/24 22:21:02 505 @@ -12,6 +12,7 @@ use Frey::Bookmarklet; use Frey::ClassBrowser; +use Frey::SVK; has 'head' => ( is => 'rw', @@ -221,6 +222,8 @@ |; + my $revision = Frey::SVK->info->{Revision} || ''; + my $html = join("\n", qq||, $self->_head_html, @@ -231,7 +234,7 @@ $body
- Frey $Frey::VERSION + Frey $Frey::VERSION $revision $status_line $right