--- trunk/lib/Frey/SVK.pm 2008/11/27 15:36:19 551 +++ trunk/lib/Frey/SVK.pm 2008/11/27 15:40:12 552 @@ -18,7 +18,7 @@ my ($self) = @_; my @modified; my $svk = $self->svk('status -q', sub { - push @modified, $1 if /^M\s+(.+)/; + push @modified, $1 if /^(M|A)\s+(.+)/; }); return @modified; } @@ -47,6 +47,8 @@ my $status = `svk status -q`; my $diff = `svk diff`; + Frey::Web->meta->apply( $self ); # provide html_escape + my $html = qq|
$status

|
 		. $self->html_escape( $diff )