X-Git-Url: https://git.ucc.asn.au/?a=blobdiff_plain;f=KernelLand%2FKernel%2Fmessages.c;h=823742333f55347696a5c3b4dce1baa0f458a072;hb=cbed08fec9c6d62f8fa4fc13a71102c799d96640;hp=c99197800bbfb3f8ae07619e3cb8a5d66bc69b76;hpb=3b864de01887f22d74ec1d564bc99913e5d82be4;p=tpg%2Facess2.git

diff --git a/KernelLand/Kernel/messages.c b/KernelLand/Kernel/messages.c
index c9919780..82374233 100644
--- a/KernelLand/Kernel/messages.c
+++ b/KernelLand/Kernel/messages.c
@@ -137,10 +137,13 @@ int Proc_GetMessage(Uint *Source, Uint BufSize, void *Buffer)
 	// Remove from list
 	tmp = cur->Messages;
 	cur->Messages = cur->Messages->Next;
+	// - Removed last message? Clear the end-of-list pointer
 	if(cur->Messages == NULL)	cur->LastMessage = NULL;
+	//  > Otherwise, re-mark the IPCMSG event flag
+	else	cur->EventState |= THREAD_EVENT_IPCMSG;
 	
 	SHORTREL( &cur->IsLocked );
-	
+
 	free(tmp);	// Free outside of lock
 
 	LEAVE('i', ret);