Fix the "huh" for the new destination format.
authorpdbogen <pdbogen@088b83a4-0077-4247-935c-42ec02c2848b>
Tue, 24 Jun 2008 01:51:14 +0000 (01:51 +0000)
committerpdbogen <pdbogen@088b83a4-0077-4247-935c-42ec02c2848b>
Tue, 24 Jun 2008 01:51:14 +0000 (01:51 +0000)
git-svn-id: https://www.cernu.us/~pdbogen/svn/destult2@49 088b83a4-0077-4247-935c-42ec02c2848b

core.pl

diff --git a/core.pl b/core.pl
index 20c3008..8706b37 100644 (file)
--- a/core.pl
+++ b/core.pl
@@ -161,7 +161,7 @@ sub cmd {
        } elsif( exists( $heap->{ 'db' }->{ uc( $what ) } ) && !$noparse ) {
                &{ $heap->{ 'commands' }->{ 'PARSE' } }( $kernel, $heap, $who, $what, $src, { dest => $dest, src=>$who, no_throttle => $no_throttle }, $replypath );
        } else {
-               $kernel->post( $src, "send_private", "Huh?", $who );
+               $kernel->post( $src, "send_private", "Huh?", { dest => $who, src => $who } );
        }
 }