X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fmsg.pl;h=93a10133e036381a184ca80c40b06441e85e43c4;hb=df49d2cf8efcb2b6becf241379700f363a7014df;hp=a1a3df0616e21927a03ae85e0abe69078a2fdf96;hpb=661d49731a7ac57ce2883ef5d757c7a8144fb6ff;p=spider.git diff --git a/cmd/msg.pl b/cmd/msg.pl index a1a3df06..93a10133 100644 --- a/cmd/msg.pl +++ b/cmd/msg.pl @@ -89,6 +89,11 @@ if ($cmd =~ /^to/i) { $old = $ref->keep ? 'Keep' : 'No Keep'; $new = 'No Keep'; $ref->keep(0); +} elsif ($cmd =~ /^node/i) { + $m = 'Delete'; + $old = $ref->delete ? 'Delete' : 'Not Delete'; + $new = 'Not Delete'; + $ref->unmark_delete; } elsif ($cmd =~ /^su/i) { $m = 'Subject'; $old = $ref->subject;