unofficial mirror of bug-gnu-emacs@gnu.org 
 help / color / mirror / code / Atom feed
From: Tino Calancha <f92capac@gmail.com>
To: 22893@debbugs.gnu.org
Subject: bug#22893: dired-marker-regexp use dired-re-mark
Date: Tue, 22 Mar 2016 18:31:40 +0900 (JST)	[thread overview]
Message-ID: <alpine.LRH.2.20.1603221828160.10864@calancha-ilc.kek.jp> (raw)
In-Reply-To: <alpine.LRH.2.20.1603031837000.25062@calancha-ilc.kek.jp>

[-- Attachment #1: Type: text/plain, Size: 113 bytes --]


I just realized dired define the variable
'dired-re-mark' to match any mark.
Using it in `dired-marker-regexp'.

[-- Attachment #2: Type: text/plain, Size: 872 bytes --]

From cf1bb8e9bcc57aa68315413e36b8cbfbbb9ac617 Mon Sep 17 00:00:00 2001
From: Tino Calancha <f92capac@gmail.com>
Date: Tue, 22 Mar 2016 18:18:54 +0900
Subject: [PATCH 3/3] 'dired-marker-regexp' use 'dired-re-mark'

* lisp/dired.el (dired-marker-regexp):
Return 'dired-re-mark' if ALL-MARKS non-nil (Bug#22893).
---
 lisp/dired.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/dired.el b/lisp/dired.el
index 618feb2..c8a712d 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -3053,7 +3053,7 @@ dired-marker-regexp
 If optional argument ALL-MARKS evaluates to non-nil, then the regexp
 matches any mark character."
   (if all-marks
-      "^[^\t ]"
+      dired-re-mark
     (concat "^" (regexp-quote (char-to-string (or marker-char
                                                   dired-marker-char))))))
 
-- 
2.7.0


      parent reply	other threads:[~2016-03-22  9:31 UTC|newest]

Thread overview: 13+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2016-03-03  9:38 bug#22893: 25.1.50; dired-get-marked-files get all marked Tino Calancha
2016-03-04 12:32 ` Lars Ingebrigtsen
2016-03-05 13:14   ` Tino Calancha
2016-03-08  5:18   ` Tino Calancha
2016-03-08 16:01     ` Eli Zaretskii
2016-03-09 15:27       ` Tino Calancha
2016-03-09 23:57         ` Juri Linkov
2016-03-10  4:19           ` Tino Calancha
2019-06-25 14:07             ` bug#22892: " Lars Ingebrigtsen
2020-08-12 11:58               ` Lars Ingebrigtsen
2016-03-10  4:43           ` Tino Calancha
2016-03-11  0:48             ` Juri Linkov
2016-03-22  9:31 ` Tino Calancha [this message]

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.gnu.org/software/emacs/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=alpine.LRH.2.20.1603221828160.10864@calancha-ilc.kek.jp \
    --to=f92capac@gmail.com \
    --cc=22893@debbugs.gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).