--- trunk/lib/Frey/Web.pm 2008/11/16 00:37:34 350 +++ trunk/lib/Frey/Web.pm 2008/11/17 16:59:06 375 @@ -128,7 +128,7 @@ sub error { my ( $self, $error ) = @_; warn $error; - $error =~ s{\s+(\S+)\s+line\s+(\d+)}{ $1 line $2}gsm; + $error =~ s{at\s+(\S+)\s+line\s+(\d+)}{ $1 line $2}gsm; return qq|
$error
|; }