diff --git a/ChangeLog b/ChangeLog
index 6d74f33a..c6df3966 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -65,6 +65,9 @@ v0.37.00	26-Dec-2002.
 		Made the incoming tic files complete case insensitive, mixed
 		case is now processed. If such file is received, the LFN will
 		be set to that name.
+		The magic unpack command now uses the mail unpack command
+		instead of file unpack command so that paths in the archive are
+		junked.
 
 	mbsebbs:
 		Changed to use the new nodelist lookup methods.
diff --git a/mbfido/magic.c b/mbfido/magic.c
index 97a7ec02..308e465e 100644
--- a/mbfido/magic.c
+++ b/mbfido/magic.c
@@ -290,7 +290,7 @@ void Magic_UnpackFile(void)
 	    sprintf(Fn, "%s/%s", TIC.BBSpath, TIC.NewFile);
 	    if ((unarc = unpacker(Fn)) != NULL) {
 		if (getarchiver(unarc)) {
-		    cmd = xstrcpy(archiver.funarc);
+		    cmd = xstrcpy(archiver.munarc);
 		    if (strlen(cmd)) {
 			rc = execute(cmd, Fn, (char *)NULL, (char *)"/dev/null", (char *)"/dev/null", (char *)"/dev/null");
 			sync();