--- trunk/lib/Frey/SVK.pm 2008/11/28 00:09:51 576 +++ trunk/lib/Frey/SVK.pm 2008/11/28 01:16:21 579 @@ -18,7 +18,7 @@ my ($self) = @_; my @modified; my $svk = $self->svk('status -q', sub { - push @modified, $1 if /^(M|A)\s+(.+)/; + push @modified, $1 if /^\w+\s+(.+)/; }); return @modified; }