From 3cc02af6bb1fd728d97df0c85b7e2ecb77e0bc1d Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Sun, 16 Aug 2009 06:33:26 +0000
Subject: [PATCH] fix bug #10783 copy sender in the Inbox.

---
 docs/changelog/7.x.x.txt    | 1 +
 lib/WebGUI/Account/Inbox.pm | 4 ++--
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt
index bf4b158bb..68b7ef231 100644
--- a/docs/changelog/7.x.x.txt
+++ b/docs/changelog/7.x.x.txt
@@ -1,4 +1,5 @@
 7.7.18
+ - fixed #10783: Inbox Copy Sender broken
  - fixed #10782: Send Message friend_wholeName template var
  - fixed #10778: Matrix navigation: list attributes
  - fixed #10776: i18n AuthLDAP::7 description 
diff --git a/lib/WebGUI/Account/Inbox.pm b/lib/WebGUI/Account/Inbox.pm
index 0f16b6276..0e1f56004 100644
--- a/lib/WebGUI/Account/Inbox.pm
+++ b/lib/WebGUI/Account/Inbox.pm
@@ -1334,9 +1334,9 @@ sub www_sendMessageSave {
 
     foreach my $uid (@toUsers) {
         $messageProperties->{userId} = $uid;
-        $inbox->addMessage($messageProperties);
+        my $thisMessage = $inbox->addMessage($messageProperties);
         if ($uid eq $session->user->userId) {
-            $message->setRead;
+            $thisMessage->setRead;
         }
     }