[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master bd53ada 379/399: counsel.el (counsel-async-split-string-re
From: |
Oleh Krehel |
Subject: |
[elpa] master bd53ada 379/399: counsel.el (counsel-async-split-string-re-alist): Extract |
Date: |
Sat, 20 Jul 2019 14:58:03 -0400 (EDT) |
branch: master
commit bd53adade9e057c70e4d84f0eb4f2c290d731ffa
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>
counsel.el (counsel-async-split-string-re-alist): Extract
* counsel.el (counsel-async-split-string-re): Obsolete.
(counsel-git-log-split-string-re): Obsolete.
Re #2133
---
counsel.el | 16 +++++++++++++---
1 file changed, 13 insertions(+), 3 deletions(-)
diff --git a/counsel.el b/counsel.el
index eebd33d..0d59890 100644
--- a/counsel.el
+++ b/counsel.el
@@ -172,6 +172,11 @@ descriptions.")
(defvar counsel-async-split-string-re "\n"
"Store the regexp for splitting shell command output.")
+(make-obsolete-variable
+ 'counsel-async-split-string-re 'counsel-async-split-string-re-alist
"<2019-07-16 Tue>")
+
+(defvar counsel-async-split-string-re-alist '((t . "\n"))
+ "Store the regexp for splitting shell command output.")
(defvar counsel-async-ignore-re nil
"Regexp matching candidates to ignore in `counsel--async-filter'.")
@@ -202,7 +207,10 @@ respectively."
(defvar counsel-grep-last-line nil)
(defun counsel--split-string (&optional str)
- (split-string (or str (buffer-string)) counsel-async-split-string-re t))
+ (split-string
+ (or str (buffer-string))
+ (ivy-alist-setting counsel-async-split-string-re-alist)
+ t))
(defun counsel--async-sentinel (process _msg)
"Sentinel function for an asynchronous counsel PROCESS."
@@ -1580,6 +1588,8 @@ done") "\n" t)))
(defvar counsel-git-log-split-string-re "^commit "
"The `split-string' separates when split output of `counsel-git-log-cmd'.")
+(make-obsolete-variable
+ 'counsel-git-log-split-string-re 'counsel-async-split-string-re-alist
"<2019-07-16 Tue>")
(defun counsel-git-log-function (str)
"Search for STR in git log."
@@ -1696,8 +1706,7 @@ currently checked out."
(defun counsel-git-log ()
"Call the \"git log --grep\" shell command."
(interactive)
- (let ((counsel-async-split-string-re counsel-git-log-split-string-re)
- (counsel-async-ignore-re "^[ \n]*$")
+ (let ((counsel-async-ignore-re "^[ \n]*$")
(counsel-yank-pop-truncate-radius 5))
(ivy-read "Grep log: " #'counsel-git-log-function
:dynamic-collection t
@@ -1707,6 +1716,7 @@ currently checked out."
(add-to-list 'ivy-format-functions-alist '(counsel-git-log .
counsel--yank-pop-format-function))
(add-to-list 'ivy-height-alist '(counsel-git-log . 4))
+(add-to-list 'counsel-async-split-string-re-alist '(counsel-git-log . "^commit
"))
;;* File
;;** `counsel-find-file'
- [elpa] master 57e77a5 372/399: counsel.el (counsel-git-log-split-string-re): Change., (continued)
- [elpa] master 57e77a5 372/399: counsel.el (counsel-git-log-split-string-re): Change., Oleh Krehel, 2019/07/20
- [elpa] master 72a827a 373/399: counsel.el (counsel-git-log): Add additional action., Oleh Krehel, 2019/07/20
- [elpa] master 259cf07 374/399: Fix ivy-previous-line-or-history, Oleh Krehel, 2019/07/20
- [elpa] master d91f61d 378/399: counsel.el (counsel--split-string): Extract, Oleh Krehel, 2019/07/20
- [elpa] master e858b10 371/399: Add autoload for various commands, Oleh Krehel, 2019/07/20
- [elpa] master 75f4146 377/399: ivy.el (ivy-occur-revert-buffer): Stay on the same line, Oleh Krehel, 2019/07/20
- [elpa] master 3ec81dc 369/399: ivy-test.el (swiper--re-builder-char-fold): Split away, Oleh Krehel, 2019/07/20
- [elpa] master 98127be 375/399: ivy.el (ivy-format-functions-alist): Fix defcustom type, Oleh Krehel, 2019/07/20
- [elpa] master 1bb48ae 376/399: swiper.el: Add :group for faces, Oleh Krehel, 2019/07/20
- [elpa] master 3380b6f 382/399: swiper.el (swiper--avy-goto): Works for swiper-isearch, Oleh Krehel, 2019/07/20
- [elpa] master bd53ada 379/399: counsel.el (counsel-async-split-string-re-alist): Extract,
Oleh Krehel <=
- [elpa] master 0703a70 380/399: counsel.el (counsel-async-ignore-re-alist): Extract, Oleh Krehel, 2019/07/20
- [elpa] master 59603df 383/399: swiper.el (swiper--avy-goto): Fix for a small amount of cands, Oleh Krehel, 2019/07/20
- [elpa] master 5f030d5 381/399: counsel.el (counsel--git-log-format-function): Add, Oleh Krehel, 2019/07/20
- [elpa] master c4c6068 384/399: doc/ivy.org: Fix RET -> C-j, Oleh Krehel, 2019/07/20
- [elpa] master ee5dacf 385/399: Add swiper-backward command, Oleh Krehel, 2019/07/20
- [elpa] master 3c6790f 387/399: ivy.el (ivy-immediate-done): Improve make-directory, Oleh Krehel, 2019/07/20
- [elpa] master 6e50ab6 391/399: ivy-test.el (swiper-isearch-backward): Goto old match on DEL, Oleh Krehel, 2019/07/20
- [elpa] master 714911b 389/399: ivy.el (ivy--sort): Higher priority for ivy-sort-matches-functions-alist, Oleh Krehel, 2019/07/20
- [elpa] master 56a1f7d 386/399: Add counsel-grep-backward and counsel-grep-or-swiper-backward commands, Oleh Krehel, 2019/07/20
- [elpa] master 79de883 388/399: ivy.el (ivy--sort): Simplify, Oleh Krehel, 2019/07/20