--- trunk/lib/Frey/Web.pm	2008/11/18 02:14:40	398
+++ trunk/lib/Frey/Web.pm	2008/11/18 13:57:52	410
@@ -10,6 +10,9 @@
 use Carp qw/confess/;
 use File::Slurp;
 
+use Frey::Bookmarklet;
+use Frey::ClassBrowser;
+
 has 'head' => (
 	is => 'rw',
 	isa => 'ArrayRef[Str]',
@@ -21,8 +24,8 @@
 	isa => 'ArrayRef[HashRef[Str]]',
 	lazy => 1,
 	default => sub { [
-		{ 'Bookmarklets' => Frey::Bookmarklet->markup },
-		{ 'ClassBrowser' => Frey::ClassBrowser->markup },
+		{ 'Bookmarklets' => Frey::Bookmarklet->new->markup },
+		{ 'ClassBrowser' => Frey::ClassBrowser->new->markup },
 	] },
 );
 
@@ -115,9 +118,6 @@
 
 =cut
 
-use Frey::Bookmarklet;
-use Frey::ClassBrowser;
-
 sub page {
 	my $self = shift;
 	my $a = {@_};
@@ -170,7 +170,7 @@
 	my ($package, $filename, $line) = caller;
 	$error .= " at $filename line $line" if $error !~ m{ at };
 	warn "WARN: $error\n";
-	$error =~ s{at\s+(\S+)\s+line\s+(\d+)}{at <a href="/editor$1+$2" target="editor">$1</a> line $2}gsm;
+	$error =~ s{at\s+(\S+)\s+line\s+(\d+)}{at <a target="editor" href="/editor+$1+$2">$1</a> line $2}gsm;
 	return qq|<pre class="frey-error">$error</pre>|;
 }