From 1968c73720582f00f2c6f942604466411bce0737 Mon Sep 17 00:00:00 2001
From: Joe Marshall <jmarshall@alum.mit.edu>
Date: Wed, 24 Feb 2010 11:51:50 -0800
Subject: [PATCH] Fixup ignores.

---
 src/imail/imail-top.scm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/imail/imail-top.scm b/src/imail/imail-top.scm
index cf6cb4708..b54359eea 100644
--- a/src/imail/imail-top.scm
+++ b/src/imail/imail-top.scm
@@ -2567,7 +2567,7 @@ WARNING: With a prefix argument, this command may take a very long
 
 (define-method insert-mime-body-inline*
     (entity (body <mime-body>) selector context mark)
-  entity body selector context		;ignore
+  entity selector			;ignore
   (call-with-auto-wrapped-output-mark
    mark
    (walk-mime-context-left-margin context)
@@ -2618,7 +2618,6 @@ WARNING: With a prefix argument, this command may take a very long
 
 (define-method compute-mime-body-outline
     ((body <mime-body-one-part>) name context)
-  context
   (append (call-next-method body name context)
 	  (list (let ((encoding (mime-body-one-part-encoding body)))
 		  (and (not (known-mime-encoding? encoding))
-- 
2.25.1