fix logging typo in del_msg

diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm
index 4c9d2e59f52752b75817394055224e7482c28eec..0cc0c0d4d853d4458abd07366ed4aeb74fc572a7 100644 (file)
--- a/perl/DXMsg.pm
+++ b/perl/DXMsg.pm
@@ -487,7 +487,7 @@ sub del_msg
 
                my $call = '';
                $call = ' by ' . $dxchan->call if $dxchan;
-               Log("Msgno $self->{msgno} expunged$call");
+               Log('msg', "Msgno $self->{msgno} expunged$call");
                
                # remove the file
                unlink filename($self->{msgno});