--- trunk/lib/Frey/Web.pm	2008/11/30 23:19:06	652
+++ trunk/lib/Frey/Web.pm	2008/11/30 23:49:32	653
@@ -7,7 +7,7 @@
 
 #use Continuity::Widget::DomNode;
 use Data::Dump qw/dump/;
-use Carp qw/confess cluck/;
+use Carp qw/confess cluck carp/;
 use File::Slurp;
 
 use Frey::Bookmarklet;
@@ -26,7 +26,7 @@
 	isa => 'Uri', coerce => 1,
 	required => 1,
 	default => sub {
-		cluck "undefined request_url";
+		carp "undefined request_url";
 		'/';
 	},
 );
@@ -249,7 +249,7 @@
 			</span>
 		|;
 
-	my $svk = Frey::SVK->new( request_url => '/' );
+	my $svk = Frey::SVK->new;
 	my $info = $svk->info;
 	my $revision = $svk->info->{Revision} || '';
 	$revision = $1 if $info->{'Mirrored From'} =~ m{Rev\.\s+(\d+)};
@@ -373,11 +373,10 @@
 sub clean_status {
 	my ($self) = shift;
 	@head = ( 'static/frey.css' );
-	my $params = { request_url => $self->request_url };
 	@status = (
-		{ 'ClassBrowser' => Frey::ClassBrowser->new( %$params, usage_on_top => 0 )->as_markup },
-		{ 'Bookmarklets' => Frey::Bookmarklet->new( %$params )->as_markup },
-		{ 'INC' => Frey::INC->new( %$params )->as_markup }, 
+		{ 'ClassBrowser' => Frey::ClassBrowser->new( usage_on_top => 0 )->as_markup },
+		{ 'Bookmarklets' => Frey::Bookmarklet->new->as_markup },
+		{ 'INC' => Frey::INC->new->as_markup }, 
 	);
 	$icon_html = '';
 }