diff --git a/ChangeLog b/ChangeLog
index 0b09a986..2cadd2cc 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -4263,6 +4263,8 @@ v0.33.19        26-Oct-2001
 		When a file area is made unavailable in menu 8.4, first the
 		files in that area area checked. If there are none, the area
 		is completly removed, including paths, indexes and database.
+		The AREADEF lines in golded.inc now contain the aka to use
+		instead of a dot.
 
 	mbsebbs:
 		Added menu 317, change FS editor shortcut keys to (Emacs/
diff --git a/mbsetup/m_marea.c b/mbsetup/m_marea.c
index e1626c60..9fb25b37 100644
--- a/mbsetup/m_marea.c
+++ b/mbsetup/m_marea.c
@@ -1320,7 +1320,7 @@ int NodeInMarea(fidoaddr A)
 
 void gold_areas(FILE *fp)
 {
-	char	*temp;
+	char	*temp, *aka;
 	FILE	*no;
 	int	i = 0;
 
@@ -1353,7 +1353,9 @@ void gold_areas(FILE *fp)
 				case ECHOMAIL	: fprintf(fp, "C Echo");	break;
 				case NEWS	: fprintf(fp, "I News");	break;
 			}
-			fprintf(fp, " JAM %s . ", msgs.Base);
+			aka = xstrcpy(strtok(aka2str(msgs.Aka), "@"));
+			fprintf(fp, " JAM %s %s ", msgs.Base, aka);
+			free(aka);
 			if (msgs.Type == NETMAIL)
 				fprintf(fp, "(Loc Pvt)");
 			else