[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master 1b5af1e 115/399: counsel.el (counsel-file-jump-args): Adju

From: Oleh Krehel
Subject: [elpa] master 1b5af1e 115/399: counsel.el (counsel-file-jump-args): Adjust
Date: Sat, 20 Jul 2019 14:57:03 -0400 (EDT)

branch: master
commit 1b5af1e68fdcf1b93c1544788db2cae13e76eaab
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    counsel.el (counsel-file-jump-args): Adjust
    Re #1820
    Thanks @Alexander-Shukaev
 counsel.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/counsel.el b/counsel.el
index ee7fdc4..54d80a2 100644
--- a/counsel.el
+++ b/counsel.el
@@ -1796,12 +1796,12 @@ Skip some dotfiles unless `ivy-text' requires them."
               (string-match re-str (directory-file-name x)))))))
     (if (or (null ivy-use-ignore)
             (null counsel-find-file-ignore-regexp)
-            (string-match "\\`\\." ivy-text))
+            (string-match-p "\\`\\." ivy-text))
       (or (cl-remove-if
            (lambda (x)
-              (string-match counsel-find-file-ignore-regexp x)
+              (string-match-p counsel-find-file-ignore-regexp x)
               (not (member x ivy-extra-directories))))
@@ -2397,7 +2397,7 @@ FZF-PROMPT, if non-nil, is passed as `ivy-read' prompt 
                         (message (cdr x)))
               :caller 'counsel-rpm)))
-(defcustom counsel-file-jump-args "-name '*' -type f -not -path '*/.git/*' 
-printf '%f\n'"
+(defcustom counsel-file-jump-args "-name '.git' -prune -o -type f -print | cut 
-c 3-"
   "Arguments for the `find-command' when using `counsel-file-jump'."
   :type 'string)
@@ -2428,7 +2428,7 @@ INITIAL-DIRECTORY, if non-nil, is used as the root 
directory for search."
               :keymap counsel-find-file-map
               :caller 'counsel-file-jump)))
-(defcustom counsel-dired-jump-args "* -type d -not -path '*/.git*'"
+(defcustom counsel-dired-jump-args "-name '.git' -prune -o -type d -print | 
cut -c 3-"
   "Arguments for the `find-command' when using `counsel-dired-jump'."
   :type 'string)

reply via email to

[Prev in Thread] Current Thread [Next in Thread]