diff --git a/ChangeLog b/ChangeLog
index 4f9cb182..2f027797 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -30,6 +30,8 @@ v0.37.01	14-Jan-2003.
 		installed.
 		Documented menu 318, was present for a long time, just not in
 		the html docs.
+		The main Makefile now sets each txtfiles directory to mode 775
+		to allow doors to write ansi/ascii screens.
 
 	nodelist.a:
 		Added experimental support for IP nodes lookup using a default
@@ -108,6 +110,8 @@ v0.37.01	14-Jan-2003.
 		Fixed send online message to send to user real names, handles
 		and unix names again.
 		The menus are machine endian independant.
+		Maybe removed a bug where the bbs sometimes crashed during
+		mail reading.
 
 	examples:
 		The English and Dutch templates are updated to show the new
diff --git a/Makefile b/Makefile
index a3938e2d..ff0f9035 100644
--- a/Makefile
+++ b/Makefile
@@ -82,6 +82,7 @@ install:
 			mkdir ${PREFIX}/dutch/macro ; \
 			${CHOWN} -R ${OWNER}:${GROUP} ${PREFIX}/dutch ; \
 		fi
+		@chmod 0775 ${PREFIX}/dutch/txtfiles
 		@if [ ! -d ${PREFIX}/english ] ; then \
 			mkdir ${PREFIX}/english ; \
 			mkdir ${PREFIX}/english/txtfiles ; \
@@ -89,6 +90,7 @@ install:
 			mkdir ${PREFIX}/english/macro ; \
 			${CHOWN} -R ${OWNER}:${GROUP} ${PREFIX}/english ; \
 		fi
+		@chmod 0775 ${PREFIX}/english/txtfiles
 		@if [ ! -d ${PREFIX}/italian ] ; then \
 			mkdir ${PREFIX}/italian ; \
 			mkdir ${PREFIX}/italian/txtfiles ; \
@@ -96,6 +98,7 @@ install:
 			mkdir ${PREFIX}/italian/macro ; \
 			${CHOWN} -R ${OWNER}:${GROUP} ${PREFIX}/italian ; \
 		fi
+		@chmod 0775 ${PREFIX}/italian/txtfiles
 		@if [ ! -d ${PREFIX}/spanish ] ; then \
 			mkdir ${PREFIX}/spanish ; \
 			mkdir ${PREFIX}/spanish/txtfiles ; \
@@ -103,6 +106,7 @@ install:
 			mkdir ${PREFIX}/spanish/macro ; \
 			${CHOWN} -R ${OWNER}:${GROUP} ${PREFIX}/spanish ; \
 		fi
+		@chmod 0775 ${PREFIX}/spanish/txtfiles
 		@if [ ! -d ${PREFIX}/galego ] ; then \
 			mkdir ${PREFIX}/galego ; \
 			mkdir ${PREFIX}/galego/txtfiles ; \
@@ -110,6 +114,7 @@ install:
 			mkdir ${PREFIX}/galego/macro ; \
 			${CHOWN} -R ${OWNER}:${GROUP} ${PREFIX}/galego ; \
 		fi
+		@chmod 0775 ${PREFIX}/galego/txtfiles
 		@if [ ! -d ${PREFIX}/german ] ; then \
 			mkdir ${PREFIX}/german; \
 			mkdir ${PREFIX}/german/txtfiles ; \
@@ -117,6 +122,7 @@ install:
 			mkdir ${PREFIX}/german/macro ; \
 			${CHOWN} -R ${OWNER}:${GROUP} ${PREFIX}/german; \
 		fi
+		@chmod 0775 ${PREFIX}/german/txtfiles
 		@if [ ! -d ${PREFIX}/ftp ] ; then \
 			mkdir ${PREFIX}/ftp ; \
 			mkdir ${PREFIX}/ftp/pub ; \
diff --git a/TODO b/TODO
index a07a1dfa..fbd47026 100644
--- a/TODO
+++ b/TODO
@@ -41,6 +41,7 @@ mbsebbs:
 
 	L: ChangeHandle, allow own unix name as handle.
 
+	N: Delete messages.
 
 newuser:
 	L: Allow handles to be the same as the unixname.
diff --git a/mbsebbs/mail.c b/mbsebbs/mail.c
index eb8ca351..c674d141 100644
--- a/mbsebbs/mail.c
+++ b/mbsebbs/mail.c
@@ -1601,316 +1601,334 @@ int CheckLine(int FG, int BG, int Email)
  */
 void MsgArea_List(char *Option)
 {
-	FILE	*pAreas;
-	int     iAreaCount = 6, Recno = 0; 
-	int     iOldArea = 0, iAreaNum = 0;
-	int     iGotArea = FALSE; /* Flag to check if user typed in area */
-	int	iCheckNew = FALSE; /* Flag to check for new mail in area */
-	long    offset;
-	char    *temp;
-	lastread	LR;
-	int loopcount=0;
+    FILE	*pAreas;
+    int		iAreaCount = 6, Recno = 0, iOldArea = 0, iAreaNum = 0, loopcount = 0;
+    int		iGotArea = FALSE; /* Flag to check if user typed in area */
+    int		iCheckNew = FALSE; /* Flag to check for new mail in area */
+    long	offset;
+    char	*temp;
+    lastread	LR;
 
-	temp         = calloc(PATH_MAX, sizeof(char));
+    temp = calloc(PATH_MAX, sizeof(char));
+    sprintf(temp,"%s/etc/mareas.data", getenv("MBSE_ROOT"));
 
-	sprintf(temp,"%s/etc/mareas.data", getenv("MBSE_ROOT"));
-
-	/*
-	 * Save old area, incase he picks a invalid area
-	 */
-	iOldArea = iMsgAreaNumber;
-
-	if(( pAreas = fopen(temp, "rb")) == NULL) {
-		WriteError("Can't open msg areas file: %s", temp);
-		free(temp);
-		fclose(pAreas);
-		return;
-	}
-	
-	/* 
-	 * Count how many records there are
-	 */
-	fread(&msgshdr, sizeof(msgshdr), 1, pAreas);
-	fseek(pAreas, 0, SEEK_END);
-	iAreaNum = (ftell(pAreas) - msgshdr.hdrsize) / (msgshdr.recsize + msgshdr.syssize);
-
-	/*
-	 * If there are menu options, parse them first
-	 *  1. Check for New Messages in Area (only option that will continue to display list)
-	 *  2. Increment Area, return
-	 *  3. Decrement Area, return
-	 *  4. Select area direct (via area number), return
-	 */
-	if (strlen(Option) != 0) {
-		if (strcmp(Option, "N") == 0) {
-			iCheckNew = TRUE;
-		} else {
-			if (strcmp(Option, "U+") == 0) 
-				while(TRUE) {
-					iMsgAreaNumber++;
-					if (iMsgAreaNumber >= iAreaNum) {
-						iMsgAreaNumber = 0;
-						loopcount++;
-						if ( loopcount > 1 ) {
-							pout(LIGHTRED, BLACK, (char *) Language(479));
-							iMsgAreaNumber = iOldArea;
-							Enter(2);
-							Pause();
-							return;
-						}
-					}
-	
-					offset = msgshdr.hdrsize + (iMsgAreaNumber * (msgshdr.recsize + msgshdr.syssize));
-					if(fseek(pAreas, offset, 0) != 0) {
-						printf("Can't move pointer there.");
-					}
-									
-					fread(&msgs, msgshdr.recsize, 1, pAreas);
-					if ((Access(exitinfo.Security, msgs.RDSec)) && (msgs.Active) && (strlen(msgs.Password) == 0)) {
-						if(Msg_Open(msgs.Base)){
-							MsgBase.Highest = Msg_Highest();
-							LR.UserID = grecno; 
-							if ( Msg_GetLastRead(&LR) != TRUE ){
-								LR.HighReadMsg = 0;
-							}
-							if (MsgBase.Highest > LR.HighReadMsg ) 
-								break;
-						}
-					}
-				}
-
-			if (strcmp(Option, "U-") == 0) 
-				while(TRUE) {
-					iMsgAreaNumber--;
-					if (iMsgAreaNumber < 0) {
-						iMsgAreaNumber = iAreaNum - 1;
-						loopcount++;
-						if ( loopcount > 1 ) {
-							pout(LIGHTRED, BLACK, (char *) Language(479));
-							iMsgAreaNumber = iOldArea;
-							Enter(2);
-							Pause();
-							return;
-						}
-					}
-	
-					offset = msgshdr.hdrsize + (iMsgAreaNumber * (msgshdr.recsize + msgshdr.syssize));
-					if(fseek(pAreas, offset, 0) != 0) {
-						printf("Can't move pointer there.");
-					}
-									
-					fread(&msgs, msgshdr.recsize, 1, pAreas);
-					if ((Access(exitinfo.Security, msgs.RDSec)) && (msgs.Active) && (strlen(msgs.Password) == 0)) {
-						if(Msg_Open(msgs.Base)){
-							MsgBase.Highest = Msg_Highest();
-							LR.UserID = grecno; 
-							if ( Msg_GetLastRead(&LR) != TRUE ){
-								LR.HighReadMsg = 0;
-							}
-							if (MsgBase.Highest > LR.HighReadMsg ) 
-								break;
-						}
-					}
-				}
-			
-			if (strcmp(Option, "M+") == 0) 
-				while(TRUE) {
-					iMsgAreaNumber++;
-					if (iMsgAreaNumber >= iAreaNum)
-						iMsgAreaNumber = 0;
-	
-					offset = msgshdr.hdrsize + (iMsgAreaNumber * (msgshdr.recsize + msgshdr.syssize));
-					if(fseek(pAreas, offset, 0) != 0) {
-						printf("Can't move pointer there.");
-					}
-									
-					fread(&msgs, msgshdr.recsize, 1, pAreas);
-					if ((Access(exitinfo.Security, msgs.RDSec)) && (msgs.Active) && (strlen(msgs.Password) == 0))
-						break;
-				}
-			
-			if (strcmp(Option, "M-") == 0) 
-				while(TRUE) {
-					iMsgAreaNumber--;
-					if (iMsgAreaNumber < 0)
-						iMsgAreaNumber = iAreaNum -1;
-	
-					offset = msgshdr.hdrsize + (iMsgAreaNumber * (msgshdr.recsize + msgshdr.syssize));
-					if(fseek(pAreas, offset, 0) != 0) {
-						printf("Can't move pointer there.");
-					}
-					
-					fread(&msgs, msgshdr.recsize, 1, pAreas);
-					if ((Access(exitinfo.Security, msgs.RDSec)) && (msgs.Active) && (strlen(msgs.Password) == 0))
-						break;
-				}
-	
-	
-			SetMsgArea(iMsgAreaNumber);
-			Syslog('+', "Msg area %lu %s", iMsgAreaNumber, sMsgAreaDesc);
-			free(temp);
-			fclose(pAreas);
-			return;
-		}
-	}
-	
-	clear();
-	Enter(1);
-	pout(CFG.HiliteF, CFG.HiliteB, (char *) Language(231));
-	Enter(2);
-
-	fseek(pAreas, msgshdr.hdrsize, 0);
-	
-	while (fread(&msgs, msgshdr.recsize, 1, pAreas) == 1) {
-		/*
-		 * Skip the echomail systems
-		 */
-		fseek(pAreas, msgshdr.syssize, SEEK_CUR);
-		if ((Access(exitinfo.Security, msgs.RDSec)) && (msgs.Active)) {
-			msgs.Name[31] = '\0';
-
-			colour(WHITE, BLACK);
-			printf("%5d", Recno + 1);
-
-			colour(LIGHTBLUE, BLACK);
-			/* Check for New Mail if N was put on option data */
-			if ( iCheckNew ) {
-				if(Msg_Open(msgs.Base)){
-					MsgBase.Highest = Msg_Highest();
-					LR.UserID = grecno; 
-					if ( Msg_GetLastRead(&LR) != TRUE ){
-						LR.HighReadMsg = 0;
-					}
-					if (MsgBase.Highest > LR.HighReadMsg ) {
-						colour(YELLOW, BLACK);
-						printf(" %c ", 42 );
-					} else {
-						printf(" %c ", 46 );
-					}
-				} else {
-					printf(" %c ", 46 );
-				}
-			} else {
-				printf(" %c ", 46);
-			}
-
-			colour(CYAN, BLACK);
-			printf("%-31s", msgs.Name);
-
-			iAreaCount++;
-
-			if ((iAreaCount % 2) == 0)
-				printf("\n");
-			else
-				printf(" ");
-		}
-
-		Recno++;
-
-		if((iAreaCount / 2) == exitinfo.iScreenLen) {
-			/* More (Y/n/=/Area #): */
-			pout(CFG.MoreF, CFG.MoreB, (char *) Language(207));
-			/*
-			 * Ask user for Area or enter to continue
-			 */
-			colour(CFG.InputColourF, CFG.InputColourB);
-			fflush(stdout);
-			GetstrC(temp, 7);
-
-			if (toupper(temp[0]) == Keystroke(207, 1))
-				break;
-
-			if ((strcmp(temp, "")) != 0) {
-				iGotArea = TRUE;
-				break;
-			}
-
-			iAreaCount = 2;
-		}
-	}
-
-	/*
-	 * If user type in area above during area listing
-	 * don't ask for it again
-	 */
-	if (!iGotArea) {
-		Enter(1);
-		pout(CFG.HiliteF, CFG.HiliteB, (char *) Language(232));
-		colour(CFG.InputColourF, CFG.InputColourB);
-		GetstrC(temp, 80);
-	}
-
-	/*
-	 * Check if user pressed ENTER
-	 */
-	if ((strcmp(temp, "")) == 0) {
-		fclose(pAreas);
-		return;
-	}
-	iMsgAreaNumber = atoi(temp);
-	iMsgAreaNumber--;
-
-	/*
-	 * Do a check in case user presses Zero
-	 */
-	if (iMsgAreaNumber == -1)
-		iMsgAreaNumber = 0;
-
-	offset = msgshdr.hdrsize + (iMsgAreaNumber * (msgshdr.recsize + msgshdr.syssize));
-	if(fseek(pAreas, offset, 0) != 0) {
-		printf("Can't move pointer there.");
-	} 
-	fread(&msgs, msgshdr.recsize, 1, pAreas);
-
-	/*
-	 * Do a check if area is greater or less number than allowed,
-	 * security acces (level, flags and age) is oke, and the area
-	 * is active.
-	 */
-	if (iMsgAreaNumber > iAreaNum || iMsgAreaNumber < 0 || (Access(exitinfo.Security, msgs.RDSec) == FALSE) || (!msgs.Active)) {
-		Enter(1);
-		/*
-		 * Invalid area specified - Please try again ...
-		 */
-		pout(LIGHTRED, BLACK, (char *) Language(233));
-		Enter(2);
-		Pause();
-		fclose(pAreas);
-		iMsgAreaNumber = iOldArea;
-		SetMsgArea(iMsgAreaNumber);
-		free(temp);
-		return;
-	}
-
-	SetMsgArea(iMsgAreaNumber);
-	Syslog('+', "Msg area %lu %s", iMsgAreaNumber, sMsgAreaDesc);
-
-	/*
-	 * Check if msg area has a password, if it does ask user for it
-	 */
-	if((strlen(msgs.Password)) > 2) {
-		Enter(2);
-		/* Please enter Area Password: */
-		pout(WHITE, BLACK, (char *) Language(233));
-		fflush(stdout);
-		colour(CFG.InputColourF, CFG.InputColourB);
-		GetstrC(temp, 20);
-
-		if((strcmp(temp, msgs.Password)) != 0) {
-			Enter(1);
-			pout(WHITE, BLACK, (char *) Language(234));
-			Syslog('!', "Incorrect Message Area # %d password given: %s", iMsgAreaNumber, temp);
-			SetMsgArea(iOldArea);
-		} else {
-			Enter(1);
-			pout(WHITE, BLACK, (char *) Language(235));
-			Enter(2);
-		}
-		Pause();
-	}
+    /*
+     * Save old area, incase he picks a invalid area
+     */
+    iOldArea = iMsgAreaNumber;
 
+    if ((pAreas = fopen(temp, "rb")) == NULL) {
+	WriteError("$Can't open %s", temp);
 	free(temp);
+	return;
+    }
+	
+    /* 
+     * Count how many records there are
+     */
+    fread(&msgshdr, sizeof(msgshdr), 1, pAreas);
+    fseek(pAreas, 0, SEEK_END);
+    iAreaNum = (ftell(pAreas) - msgshdr.hdrsize) / (msgshdr.recsize + msgshdr.syssize);
+
+    /*
+     * If there are menu options, parse them first
+     *  1. Check for New Messages in Area (only option that will continue to display list)
+     *  2. Increment Area, return
+     *  3. Decrement Area, return
+     *  4. Select area direct (via area number), return
+     */
+    if (strlen(Option) != 0) {
+	if (strcmp(Option, "N") == 0) {
+	    iCheckNew = TRUE;
+	} else {
+	    if (strcmp(Option, "U+") == 0) {
+		while(TRUE) {
+		    iMsgAreaNumber++;
+		    if (iMsgAreaNumber >= iAreaNum) {
+			iMsgAreaNumber = 0;
+			loopcount++;
+			if (loopcount > 1) {
+			    /* No more areas with unread messages */
+			    pout(LIGHTRED, BLACK, (char *) Language(479));
+			    iMsgAreaNumber = iOldArea;
+			    Enter(2);
+			    Pause();
+			    free(temp);
+			    fclose(pAreas);
+			    return;
+			}
+		    }
+	
+		    offset = msgshdr.hdrsize + (iMsgAreaNumber * (msgshdr.recsize + msgshdr.syssize));
+		    if (fseek(pAreas, offset, 0) != 0) {
+			WriteError("$Can't move pointer in %s", temp);
+		    }
+									
+		    fread(&msgs, msgshdr.recsize, 1, pAreas);
+		    if ((Access(exitinfo.Security, msgs.RDSec)) && (msgs.Active) && (strlen(msgs.Password) == 0)) {
+			if (Msg_Open(msgs.Base)) {
+			    MsgBase.Highest = Msg_Highest();
+			    LR.UserID = grecno; 
+			    if (Msg_GetLastRead(&LR) != TRUE) {
+				LR.HighReadMsg = 0;
+			    }
+			    if (MsgBase.Highest > LR.HighReadMsg) {
+				Msg_Close();
+				break;
+			    }
+			    Msg_Close();
+			}
+		    }
+		}
+	    }
+
+	    if (strcmp(Option, "U-") == 0) {
+		while(TRUE) {
+		    iMsgAreaNumber--;
+		    if (iMsgAreaNumber < 0) {
+			iMsgAreaNumber = iAreaNum - 1;
+			loopcount++;
+			if (loopcount > 1) {
+			    /* No more areas with unread messages */
+			    pout(LIGHTRED, BLACK, (char *) Language(479));
+			    iMsgAreaNumber = iOldArea;
+			    Enter(2);
+			    Pause();
+			    fclose(pAreas);
+			    free(temp);
+			    return;
+			}
+		    }
+	
+		    offset = msgshdr.hdrsize + (iMsgAreaNumber * (msgshdr.recsize + msgshdr.syssize));
+		    if (fseek(pAreas, offset, 0) != 0) {
+			WriteError("$Can't move pointer in %s", temp);
+		    }
+									
+		    fread(&msgs, msgshdr.recsize, 1, pAreas);
+		    if ((Access(exitinfo.Security, msgs.RDSec)) && (msgs.Active) && (strlen(msgs.Password) == 0)) {
+			if (Msg_Open(msgs.Base)) {
+			    MsgBase.Highest = Msg_Highest();
+			    LR.UserID = grecno; 
+			    if (Msg_GetLastRead(&LR) != TRUE ){
+				LR.HighReadMsg = 0;
+			    }
+			    if (MsgBase.Highest > LR.HighReadMsg) {
+				Msg_Close();	
+				break;
+			    }
+			    Msg_Close();
+			}
+		    }
+		}
+	    }
+
+	    if (strcmp(Option, "M+") == 0) {
+		while (TRUE) {
+		    iMsgAreaNumber++;
+		    if (iMsgAreaNumber >= iAreaNum) {
+			iMsgAreaNumber = 0;
+		    }
+		    offset = msgshdr.hdrsize + (iMsgAreaNumber * (msgshdr.recsize + msgshdr.syssize));
+		    if(fseek(pAreas, offset, 0) != 0) {
+			WriteError("$Can't move pointer in %s", temp);
+		    }
+									
+		    fread(&msgs, msgshdr.recsize, 1, pAreas);
+		    if ((Access(exitinfo.Security, msgs.RDSec)) && (msgs.Active) && (strlen(msgs.Password) == 0)) {
+			break;
+		    }
+		}
+	    }
+		
+	    if (strcmp(Option, "M-") == 0) {
+		while (TRUE) {
+		    iMsgAreaNumber--;
+		    if (iMsgAreaNumber < 0) {
+			iMsgAreaNumber = iAreaNum -1;
+		    }
+		    offset = msgshdr.hdrsize + (iMsgAreaNumber * (msgshdr.recsize + msgshdr.syssize));
+		    if (fseek(pAreas, offset, 0) != 0) {
+			WriteError("$Can't move pointer in %s", temp);
+		    }
+					
+		    fread(&msgs, msgshdr.recsize, 1, pAreas);
+		    if ((Access(exitinfo.Security, msgs.RDSec)) && (msgs.Active) && (strlen(msgs.Password) == 0)) {
+			break;
+		    }
+		}
+	    }
+
+	    SetMsgArea(iMsgAreaNumber);
+	    Syslog('+', "Msg area %lu %s", iMsgAreaNumber, sMsgAreaDesc);
+	    free(temp);
+	    fclose(pAreas);
+	    return;
+	}
+    }
+
+    clear();
+    Enter(1);
+    /*  Message Areas */
+    pout(CFG.HiliteF, CFG.HiliteB, (char *) Language(231));
+    Enter(2);
+
+    fseek(pAreas, msgshdr.hdrsize, 0);
+    
+    while (fread(&msgs, msgshdr.recsize, 1, pAreas) == 1) {
+	/*
+	 * Skip the echomail systems
+	 */
+	fseek(pAreas, msgshdr.syssize, SEEK_CUR);
+	if ((Access(exitinfo.Security, msgs.RDSec)) && (msgs.Active)) {
+	    msgs.Name[31] = '\0';
+
+	    colour(WHITE, BLACK);
+	    printf("%5d", Recno + 1);
+
+	    colour(LIGHTBLUE, BLACK);
+	    /* Check for New Mail if N was put on option data */
+	    if (iCheckNew) {
+		if (Msg_Open(msgs.Base)) {
+		    MsgBase.Highest = Msg_Highest();
+		    LR.UserID = grecno; 
+		    if (Msg_GetLastRead(&LR) != TRUE) {
+			LR.HighReadMsg = 0;
+		    }
+		    if (MsgBase.Highest > LR.HighReadMsg ) {
+			pout(YELLOW, BLACK, (char *)" * ");
+		    } else {
+			printf(" . ");
+		    }
+		    Msg_Close();
+		} else {
+		    printf(" . ");
+		}
+	    } else {
+		printf(" . ");
+	    }
+
+	    colour(CYAN, BLACK);
+	    printf("%-31s", msgs.Name);
+
+	    iAreaCount++;
+
+	    if ((iAreaCount % 2) == 0)
+		printf("\n");
+	    else
+		printf(" ");
+	}
+
+	Recno++;
+
+	if ((iAreaCount / 2) == exitinfo.iScreenLen) {
+	    /* More (Y/n/=/Area #): */
+	    pout(CFG.MoreF, CFG.MoreB, (char *) Language(207));
+	    /*
+	     * Ask user for Area or enter to continue
+	     */
+	    colour(CFG.InputColourF, CFG.InputColourB);
+	    fflush(stdout);
+	    GetstrC(temp, 7);
+
+	    if (toupper(temp[0]) == Keystroke(207, 1))
+		break;
+
+	    if ((strcmp(temp, "")) != 0) {
+		iGotArea = TRUE;
+		break;
+	    }
+
+	    iAreaCount = 2;
+	}
+    }
+
+    /*
+     * If user type in area above during area listing
+     * don't ask for it again
+     */
+    if (!iGotArea) {
+	Enter(1);
+	/* Select Area: */
+	pout(CFG.HiliteF, CFG.HiliteB, (char *) Language(232));
+	colour(CFG.InputColourF, CFG.InputColourB);
+	GetstrC(temp, 80);
+    }
+
+    /*
+     * Check if user pressed ENTER
+     */
+    if ((strcmp(temp, "")) == 0) {
 	fclose(pAreas);
+	free(temp);
+	return;
+    }
+    iMsgAreaNumber = atoi(temp);
+    iMsgAreaNumber--;
+
+    /*
+     * Do a check in case user presses Zero
+     */
+    if (iMsgAreaNumber == -1)
+	iMsgAreaNumber = 0;
+
+    offset = msgshdr.hdrsize + (iMsgAreaNumber * (msgshdr.recsize + msgshdr.syssize));
+    if (fseek(pAreas, offset, 0) != 0) {
+	WriteError("$Can't move pointer in mareas.data.");
+    } 
+    fread(&msgs, msgshdr.recsize, 1, pAreas);
+
+    /*
+     * Do a check if area is greater or less number than allowed,
+     * security acces (level, flags and age) is oke, and the area
+     * is active.
+     */
+    if (iMsgAreaNumber > iAreaNum || iMsgAreaNumber < 0 || (Access(exitinfo.Security, msgs.RDSec) == FALSE) || (!msgs.Active)) {
+	Enter(1);
+	/*
+	 * Invalid area specified - Please try again ...
+	 */
+	pout(LIGHTRED, BLACK, (char *) Language(233));
+	Enter(2);
+	Pause();
+	fclose(pAreas);
+	iMsgAreaNumber = iOldArea;
+	SetMsgArea(iMsgAreaNumber);
+	free(temp);
+	return;
+    }
+
+    SetMsgArea(iMsgAreaNumber);
+    Syslog('+', "Msg area %lu %s", iMsgAreaNumber, sMsgAreaDesc);
+
+    /*
+     * Check if msg area has a password, if it does ask user for it
+     */
+    if ((strlen(msgs.Password)) > 2) {
+	Enter(2);
+	/* Please enter Area Password: */
+	pout(WHITE, BLACK, (char *) Language(233));
+	fflush(stdout);
+	colour(CFG.InputColourF, CFG.InputColourB);
+	GetstrC(temp, 20);
+
+	if ((strcmp(temp, msgs.Password)) != 0) {
+	    Enter(1);
+	    /* Password is incorrect */
+	    pout(WHITE, BLACK, (char *) Language(234));
+	    Syslog('!', "Incorrect Message Area # %d password given: %s", iMsgAreaNumber, temp);
+	    SetMsgArea(iOldArea);
+	} else {
+	    Enter(1);
+	    /* Password is correct */
+	    pout(WHITE, BLACK, (char *) Language(235));
+	    Enter(2);
+	}
+	Pause();
+    }
+
+    free(temp);
+    fclose(pAreas);
 }