--- contrib/sequencer-original	Tue Dec 10 01:50:48 1996
+++ contrib/sequencer	Sat Sep 12 14:17:54 1998
@@ -17,6 +17,8 @@
 # from majordomo
 #
 # Based heavily upon the resend script included in the majordomo distribution
+use IM::Config;
+use IM::EncDec;
 
 # set our path explicitly
 $ENV{'PATH'} = "/bin:/usr/bin:/usr/sbin:/sbin";
@@ -421,7 +423,10 @@
 	if (defined($opt_N)) {
 		if (open (INDEX, ">>$filedir/$opt_l$filedir_suffix/INDEX")) {
 			$timenow = localtime(time);
-			printf(INDEX  "%s\n\tFrom %s on %s\n", $subject, $from, $timenow);
+                        $decoded_subject = mime_decode_string($subject);
+                        $decoded_from    = mime_decode_string($from);
+                        printf(INDEX  "%5d %s\n\tFrom %s on %s\n", 
+                           $seqnum, $decoded_subject, $decoded_from, $timenow);
 			close (INDEX);
 		}
 		open (ARCHIVE, ">$filedir/$opt_l$filedir_suffix/$seqnum");