From 38f55eb253d9dd5b16de1ab37da2014dfd2a3ed3 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Sat, 31 Oct 2009 16:35:42 -0500
Subject: clone the last message, don't just try to recreate it

---
 lib/IM/Engine/Plugin/Commands/Command/Help.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lib/IM/Engine/Plugin/Commands/Command/Help.pm b/lib/IM/Engine/Plugin/Commands/Command/Help.pm
index f400157..5847414 100644
--- a/lib/IM/Engine/Plugin/Commands/Command/Help.pm
+++ b/lib/IM/Engine/Plugin/Commands/Command/Help.pm
@@ -10,8 +10,9 @@ sub default {
     my ($sender, $action) = @_;
     $self->is_active(0);
     my $prefix = $self->_ime_plugin->prefix;
-    my $message = IM::Engine::Incoming->new(
-        sender  => $self->_ime_plugin->_last_message->sender,
+    my $last_message = $self->_ime_plugin->_last_message;
+    my $message = $last_message->meta->clone_object(
+        $last_message,
         message => "${prefix}$action -help",
     );
     return $self->_ime_plugin->incoming($message);
-- 
cgit v1.2.3-54-g00ecf