--- trunk/lib/Frey/Web.pm 2008/11/19 19:59:52 468
+++ trunk/lib/Frey/Web.pm 2008/11/20 11:56:41 473
@@ -24,8 +24,8 @@
isa => 'ArrayRef[HashRef[Str]]',
lazy => 1,
default => sub { [
- { 'Bookmarklets' => Frey::Bookmarklet->new->as_markup },
{ 'ClassBrowser' => Frey::ClassBrowser->new( usage_on_top => 0 )->as_markup },
+ { 'Bookmarklets' => Frey::Bookmarklet->new->as_markup },
] },
);
@@ -186,6 +186,13 @@
. qq||
if $self->warnings;
+ my $right =
+ qq|
+
+ $url
+
+ |;
+
my $html = join("\n",
qq||,
$self->_head_html,
@@ -197,8 +204,8 @@
$body
Frey $Frey::VERSION
-
$url
$status_line
+ $right
|,