From 805a23b1abf942a286e323f509b837bfc2e776f9 Mon Sep 17 00:00:00 2001
From: CaS <CaS@72102866-910b-0410-8b05-ffd578937521>
Date: Tue, 21 Jan 2003 16:53:56 +0000
Subject: [PATCH] When creating multipart/related, set start part explicitly.

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@15671 72102866-910b-0410-8b05-ffd578937521
---
 Source/Additions/GSMime.m | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/Source/Additions/GSMime.m b/Source/Additions/GSMime.m
index 35dc30df5..9016f6497 100644
--- a/Source/Additions/GSMime.m
+++ b/Source/Additions/GSMime.m
@@ -3948,6 +3948,13 @@ static NSCharacterSet	*tokenSet = nil;
 	  if (v == nil)
 	    {
 	      start = [content objectAtIndex: 0];
+	      v = [start contentID];
+	      if (v == nil)
+		{
+		  hdr = [start makeContentID];
+		  v = [hdr value];
+		}
+	      [type setParameter: v forKey: @"start"];
 	    }
 	  else
 	    {