- $self->append( $user, 'rename', $from, $to );
+ my $f_full = "$user->{dir}/$from";
+ my $t_full = "$user->{dir}/$to";
+
+ $self->mkbasepath( $t_full, { uid => $user->{uid}, gid => $user->{gid} } );
+ my $ok = rename $f_full, $t_full;
+
+ my $md5 = $self->md5_get($t_full);
+ if ( ! $md5 ) {
+ warn "ERROR: no md5sum for $from";
+ return $ok; # XXX our internal error
+ }
+
+ $self->append_meta('md5sum', $user, 'rename' => $from );
+ $self->append_meta('md5sum', $user, $md5 => $from );
+
+ $self->refresh_file_list( $user );
+
+ return $ok;