From: Chris Hanson Date: Tue, 23 May 2000 03:58:25 +0000 (+0000) Subject: Fix typo. X-Git-Tag: 20090517-FFI~3717 X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=96cd3469a820926fd7987a30da96c3820bfd4fb8;p=mit-scheme.git Fix typo. --- diff --git a/v7/src/imail/imail-top.scm b/v7/src/imail/imail-top.scm index f801bbbd4..f046f2e41 100644 --- a/v7/src/imail/imail-top.scm +++ b/v7/src/imail/imail-top.scm @@ -1,6 +1,6 @@ ;;; -*-Scheme-*- ;;; -;;; $Id: imail-top.scm,v 1.95 2000/05/23 03:57:44 cph Exp $ +;;; $Id: imail-top.scm,v 1.96 2000/05/23 03:58:25 cph Exp $ ;;; ;;; Copyright (c) 1999-2000 Massachusetts Institute of Technology ;;; @@ -1116,8 +1116,7 @@ ADDRESSES is a string consisting of several addresses separated by commas." ,@(if (ref-variable mail-self-blind buffer) `(("Resent-Bcc" ,(mail-from-string buffer))) '()) - ,@(map transform - (lambda (header) + ,@(map (lambda (header) (list (header-field-name header) (header-field-value header))) (list-transform-negative (message-header-fields message)