From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Juri Linkov Newsgroups: gmane.emacs.devel Subject: Re: assoc-delete-all Date: Tue, 05 Jul 2005 08:33:55 +0300 Organization: JURTA Message-ID: <878y0lhl4x.fsf@jurta.org> References: <42C7300C.8050104@student.lu.se> <87zmt3nsx8.fsf@jurta.org> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1120543867 5639 80.91.229.2 (5 Jul 2005 06:11:07 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Tue, 5 Jul 2005 06:11:07 +0000 (UTC) Cc: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Tue Jul 05 08:11:06 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1Dpge0-0002G6-23 for ged-emacs-devel@m.gmane.org; Tue, 05 Jul 2005 08:10:56 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1DpgfE-0004zY-9n for ged-emacs-devel@m.gmane.org; Tue, 05 Jul 2005 02:12:12 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1DpgVD-00025Q-DN for emacs-devel@gnu.org; Tue, 05 Jul 2005 02:01:51 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1DpgV1-00020G-TP for emacs-devel@gnu.org; Tue, 05 Jul 2005 02:01:46 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1DpgUz-0001o8-NM for emacs-devel@gnu.org; Tue, 05 Jul 2005 02:01:38 -0400 Original-Received: from [194.126.101.98] (helo=mail.neti.ee) by monty-python.gnu.org with esmtp (Exim 4.34) id 1DpgNn-0005DL-9K for emacs-devel@gnu.org; Tue, 05 Jul 2005 01:54:11 -0400 Original-Received: from mail.neti.ee (80-235-32-204-dsl.mus.estpak.ee [80.235.32.204]) by Relayhost1.neti.ee (Postfix) with ESMTP id D1BF51EAE; Tue, 5 Jul 2005 08:48:04 +0300 (EEST) Original-To: Juanma Barranquero In-Reply-To: (Juanma Barranquero's message of "Mon, 4 Jul 2005 11:00:46 +0200") User-Agent: Gnus/5.110004 (No Gnus v0.4) Emacs/22.0.50 (gnu/linux) X-Virus-Scanned: by amavisd-new-2.2.1 (20041222) (Debian) at neti.ee X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:40395 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:40395 >> with this function >> >> (assoc-delete-all "." (assoc-delete-all ".." file-alist1)) >> >> Even better would be to allow a test function like in assoc-default: >> >> (assoc-delete-all nil file-alist1 (lambda (key) (string-match "^\.\.?$" key))) > > That's one of these things that would be much easier if we could use CL: Another thing that would be easier with CL is its `set-difference' which is currently duplicated in dired-aux.el as `dired-file-set-difference' with the specialization to work only on file attributes. -- Juri Linkov http://www.jurta.org/emacs/