From 42c2c84eedb56a86551c8e0fd95d33ddf967447d Mon Sep 17 00:00:00 2001
From: Wolfgang Sourdeau <wsourdeau@inverse.ca>
Date: Tue, 2 Feb 2010 22:07:50 +0000
Subject: [PATCH] Monotone-Parent: 2d74e4a1d7a6712cf530cd008210def6d2ee0ecc
 Monotone-Revision: e046e450fc30a21b1550b89a91fb49c2676d0457

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2010-02-02T22:07:50
Monotone-Branch: ca.inverse.sogo
---
 ChangeLog                           | 4 ++++
 SoObjects/Mailer/SOGoMailBodyPart.m | 8 +++++++-
 2 files changed, 11 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index a7cbace9c..67c4fad5b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2010-02-02  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
 
+	* SoObjects/Mailer/SOGoMailBodyPart.m (-imap4URL): we assign our
+	"imap4URL" ivar so that it can be access directly in order
+	methods.
+
 	* Tests/Integration/test-davacl.py
 	(DAVCalendarAclTest._testEventDAVAcl): test
 	current-user-privilege-set on tasks too.
diff --git a/SoObjects/Mailer/SOGoMailBodyPart.m b/SoObjects/Mailer/SOGoMailBodyPart.m
index b0c06e7e7..cf58c1023 100644
--- a/SoObjects/Mailer/SOGoMailBodyPart.m
+++ b/SoObjects/Mailer/SOGoMailBodyPart.m
@@ -138,7 +138,13 @@ static BOOL debugOn = NO;
 - (NSURL *) imap4URL
 {
   /* reuse URL of message */
-  return [[self mailObject] imap4URL];
+  if (!imap4URL)
+    {
+      imap4URL = [[self mailObject] imap4URL];
+      [imap4URL retain];
+    }
+
+  return imap4URL;
 }
 
 /* part info */