delete -> remove

diff --git a/mubot4fb.pl b/mubot4fb.pl
index 24c0fd5..d0e95c4 100755 (executable)
--- a/mubot4fb.pl
+++ b/mubot4fb.pl
@@ -262,7 +262,7 @@ sub _add {
        return 0;
 }
 
-sub _delete_prev {
+sub _remove_prev {
        my ($me, $args) = @_;
 
        my $last_post = $me->{db}->search_lastpost_by_submitter({who => $args->{who}});
@@ -272,11 +272,11 @@ sub _delete_prev {
        } elsif ($last_post->{post_time} < time() - 3600) {
                return $args->{who}.': いまのっていつの? 最後のはこれだけど古いんだにゃ ' . $me->{fb}->post_uri($last_post->{fb_post_id});
        } else {
-               return $me->_delete($args, $last_post->{'fb_post_id'});
+               return $me->_remove($args, $last_post->{'fb_post_id'});
        }
 }
 
-sub _delete {
+sub _remove {
        my ($me, $args, $post_id)  =@_;
        my ($resp_msg, $resp);
 
@@ -336,9 +336,9 @@ sub said {
        } elsif ($args->{body} =~ /^ふみくん\s+(.+)\s*$/) {
                my $cmd = $1;
                if ($cmd eq 'いまのなし') {
-                       $resp_msg = $me->_delete_prev($args);
+                       $resp_msg = $me->_remove_prev($args);
                } elsif ($cmd =~ /削除\s+(?:$me->{cfg}->{fb_page_url}posts\/)?([0-9]+)$/) {
-                       $resp_msg = $me->_delete($args, $1);
+                       $resp_msg = $me->_remove($args, $1);
                } elsif ($cmd =~ /\?$/) {
                        $resp_msg = $me->_search_start($args);
                } elsif ($cmd =~ /つぎ/) {