# $self->file_set($data);
}
+# client doesn't issue --delete
sub removed_file {
my ( $self, $data ) = @_;
warn "# new_link ",dump $data;
+=for removed
+
if ( $data->{file} =~ m{^(.*/?)\.send/([^/]+)/(.+)$} ) {
my ( $dir, $to, $name ) = ( $1, $2, $3 );
my $path = $self->blob_path($data);
warn "ERROR: can't SEND To:$to Name:$name Link:$link_to";
}
}
+
+=cut
+
}
sub init_pid_login {