From 17af94b72778ce9327d90a8aeeba8463433fe57e Mon Sep 17 00:00:00 2001 From: tomo Date: Sun, 16 Jan 2000 07:08:52 +0000 Subject: [PATCH] (mime-delq-null-situation): Moved to mime-view.el. --- mime-play.el | 13 ------------- 1 file changed, 13 deletions(-) diff --git a/mime-play.el b/mime-play.el index b98ccea..9e258c0 100644 --- a/mime-play.el +++ b/mime-play.el @@ -217,19 +217,6 @@ If MODE is specified, play as it. Default MODE is \"play\"." ))) ) -(defsubst mime-delq-null-situation (situations field - &optional ignored-value) - (let (dest) - (while situations - (let* ((situation (car situations)) - (cell (assq field situation))) - (if cell - (or (eq (cdr cell) ignored-value) - (setq dest (cons situation dest)) - ))) - (setq situations (cdr situations))) - dest)) - (defun mime-compare-situation-with-example (situation example) (let ((example (copy-alist example)) (match 0)) -- 1.7.10.4