From 4f5e3a6a430d3b6bced5cf685fa5d2430f9254ad Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Tue, 2 Sep 2008 02:53:45 +0000
Subject: [PATCH] Fix a bug in the delete method, execute is passed an array
 ref. Update POD about constructors/instanciators.

---
 lib/WebGUI/Inbox/Message.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lib/WebGUI/Inbox/Message.pm b/lib/WebGUI/Inbox/Message.pm
index 94fab0fb6..697f4a515 100644
--- a/lib/WebGUI/Inbox/Message.pm
+++ b/lib/WebGUI/Inbox/Message.pm
@@ -125,7 +125,7 @@ Deletes this message from the inbox.
 sub delete {
 	my $self = shift;
 	my $sth = $self->session->db->prepare("delete from inbox where messageId=?");
-	$sth->execute($self->getId);
+	$sth->execute([$self->getId]);
 }
 
 #-------------------------------------------------------------------
@@ -189,7 +189,8 @@ sub getId {
 
 =head2 new ( session, messageId )
 
-Constructor.
+Constructor used to access existing messages.  Use create for making
+new messages.
 
 =head3 session