branch: master
commit 4e6145cfb2942d41c0d63903ed7d70bfab889a5d
Author: Oleh Krehel <[email protected]>
Commit: Oleh Krehel <[email protected]>
counsel.el (counsel-yank-pop-separator): New defcustom
* counsel.el (counsel--yank-pop-format-function): Update.
Fixes #660
---
counsel.el | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/counsel.el b/counsel.el
index f2ec273..d091ce8 100644
--- a/counsel.el
+++ b/counsel.el
@@ -2052,6 +2052,11 @@ INITIAL-INPUT can be given as the initial minibuffer
input."
(mapconcat #'identity seq "\n")))
(error str)))
+(defcustom counsel-yank-pop-separator "\n"
+ "Separator for the kill ring strings in `counsel-yank-pop'."
+ :group 'ivy
+ :type 'string)
+
(defun counsel--yank-pop-format-function (cand-pairs)
(ivy--format-function-generic
(lambda (str)
@@ -2064,7 +2069,7 @@ INITIAL-INPUT can be given as the initial minibuffer
input."
(lambda (str)
(counsel--yank-pop-truncate str))
cand-pairs
- "\n"))
+ counsel-yank-pop-separator))
(defun counsel-yank-pop-action (s)
"Insert S into the buffer, overwriting the previous yank."
