X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fmsg.pl;h=ddca370380f41b90d4bcda9972c68e78e5fbc8d9;hb=eba7370bb0458ae84b4815f30494a7c389008d0e;hp=a1a3df0616e21927a03ae85e0abe69078a2fdf96;hpb=661d49731a7ac57ce2883ef5d757c7a8144fb6ff;p=spider.git diff --git a/cmd/msg.pl b/cmd/msg.pl index a1a3df06..ddca3703 100644 --- a/cmd/msg.pl +++ b/cmd/msg.pl @@ -4,7 +4,7 @@ # # Copyright (c) 1999 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; @@ -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;