From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Magnus Henoch Newsgroups: gmane.emacs.bugs Subject: bug#6148: add ability to hide unregistered files in vc-dir Date: Mon, 10 May 2010 12:30:26 +0100 Message-ID: <84iq6wq9il.fsf@linux-b2a3.site> References: <6p39y0o9ec.fsf@fencepost.gnu.org> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: dough.gmane.org 1273492793 31276 80.91.229.12 (10 May 2010 11:59:53 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Mon, 10 May 2010 11:59:53 +0000 (UTC) To: 6148@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Mon May 10 13:59:52 2010 connect(): No such file or directory Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1OBReB-0001Jj-HH for geb-bug-gnu-emacs@m.gmane.org; Mon, 10 May 2010 13:59:49 +0200 Original-Received: from localhost ([127.0.0.1]:33342 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1OBRe7-0002ru-IH for geb-bug-gnu-emacs@m.gmane.org; Mon, 10 May 2010 07:59:39 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1OBRb8-0001Ny-6p for bug-gnu-emacs@gnu.org; Mon, 10 May 2010 07:56:34 -0400 Original-Received: from [140.186.70.92] (port=58905 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1OBRb2-0001N4-NO for bug-gnu-emacs@gnu.org; Mon, 10 May 2010 07:56:33 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1OBRay-0002Hr-3n for bug-gnu-emacs@gnu.org; Mon, 10 May 2010 07:56:28 -0400 Original-Received: from debbugs.gnu.org ([140.186.70.43]:37361) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1OBRax-0002Hf-Sg for bug-gnu-emacs@gnu.org; Mon, 10 May 2010 07:56:24 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.69) (envelope-from ) id 1OBRCQ-0004OR-VR; Mon, 10 May 2010 07:31:03 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Magnus Henoch Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-To: owner@debbugs.gnu.org Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Mon, 10 May 2010 11:31:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 6148 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: Original-Received: via spool by 6148-submit@debbugs.gnu.org id=B6148.127349104616877 (code B ref 6148); Mon, 10 May 2010 11:31:02 +0000 Original-Received: (at 6148) by debbugs.gnu.org; 10 May 2010 11:30:46 +0000 Original-Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1OBRCA-0004OA-BB for submit@debbugs.gnu.org; Mon, 10 May 2010 07:30:46 -0400 Original-Received: from server88-208-246-34.live-servers.net ([88.208.246.34] helo=zimbra.erlangsystems.com) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1OBRC9-0004O5-9N for 6148@debbugs.gnu.org; Mon, 10 May 2010 07:30:45 -0400 Original-Received: from localhost (localhost [127.0.0.1]) by zimbra.erlangsystems.com (Postfix) with ESMTP id D500153A65A for <6148@debbugs.gnu.org>; Mon, 10 May 2010 12:30:38 +0100 (BST) Original-Received: from zimbra.erlangsystems.com ([127.0.0.1]) by localhost (zimbra.erlangsystems.com [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id mlzFaCsyEJlP for <6148@debbugs.gnu.org>; Mon, 10 May 2010 12:30:33 +0100 (BST) Original-Received: by zimbra.erlangsystems.com (Postfix, from userid 1001) id C758853A65B; Mon, 10 May 2010 12:30:33 +0100 (BST) Original-Received: from linux-b2a3.site (host213-123-170-251.in-addr.btopenworld.com [213.123.170.251]) by zimbra.erlangsystems.com (Postfix) with ESMTP id 7277353A65A for <6148@debbugs.gnu.org>; Mon, 10 May 2010 12:30:32 +0100 (BST) X-Hashcash: 1:25:100510:rgm@gnu.org::4AdYoK4VRDRXlk6d:000000Ggbs X-Hashcash: 1:25:100510:6148@debbugs.gnu.org::a16qsomoNRU4N4oy:00000000000000000000000000000000000000002O526 In-Reply-To: <6p39y0o9ec.fsf@fencepost.gnu.org> (Glenn Morris's message of "Sun, 09 May 2010 21:03:39 -0400") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.0.50 (gnu/linux) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list Resent-Date: Mon, 10 May 2010 07:31:02 -0400 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 3) X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:36829 Archived-At: This piece of code has been in my .emacs for a while: (defun my-vc-dir-hide-some (states) "Hide files whose state is in STATES." (interactive (list (progn (unless vc-ewoc (error "Not in a vc-dir buffer")) (mapcar 'intern (completing-read-multiple "Hide files that are in state(s): " (let (possible-states) (ewoc-map (lambda (item) (let ((state (vc-dir-fileinfo->state item))) (when state (pushnew state possible-states)) nil)) vc-ewoc) (mapcar 'symbol-name possible-states)) nil t))))) (let ((inhibit-read-only t)) (ewoc-filter vc-ewoc (lambda (file) (not (memq (vc-dir-fileinfo->state file) states)))))) (eval-after-load "vc-dir" '(define-key vc-dir-mode-map "H" 'my-vc-dir-hide-some)) -- Magnus Henoch