From 7c1825d08be7e25526c128a9b128bcac45d418c9 Mon Sep 17 00:00:00 2001 From: Katsumi Yamaoka Date: Wed, 19 Apr 2006 22:17:04 +0000 Subject: [PATCH] (mm-inline-text): Use equal instead of equalp. --- lisp/ChangeLog | 4 ++++ lisp/mm-view.el | 4 ++-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f27e6af67..f8bf778bd 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2006-04-19 Katsumi Yamaoka + + * mm-view.el (mm-inline-text): Use equal instead of equalp. + 2006-04-18 Teodor Zlatanov * gnus-registry.el (gnus-registry-cache-save): remove text diff --git a/lisp/mm-view.el b/lisp/mm-view.el index 675d4e343..7bf57e1f5 100644 --- a/lisp/mm-view.el +++ b/lisp/mm-view.el @@ -422,8 +422,8 @@ (save-restriction (narrow-to-region b (point)) (goto-char b) - (fill-flowed nil (equalp (cdr (assoc 'delsp (mm-handle-type handle))) - "yes")) + (fill-flowed nil (equal (cdr (assoc 'delsp (mm-handle-type handle))) + "yes")) (goto-char (point-max)))) (save-restriction (narrow-to-region b (point)) -- 2.34.1