[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/ivy-explorer 545e0a9 05/29: Make message function a use
From: |
Clemens Radermacher |
Subject: |
[elpa] externals/ivy-explorer 545e0a9 05/29: Make message function a user option |
Date: |
Tue, 12 Mar 2019 09:04:34 -0400 (EDT) |
branch: externals/ivy-explorer
commit 545e0a93be53d985407121df2fe491f161d8920e
Author: Clemens Radermacher <address@hidden>
Commit: Clemens Radermacher <address@hidden>
Make message function a user option
---
ivy-explorer.el | 17 ++++++++++-------
1 file changed, 10 insertions(+), 7 deletions(-)
diff --git a/ivy-explorer.el b/ivy-explorer.el
index 127a626..cf012eb 100644
--- a/ivy-explorer.el
+++ b/ivy-explorer.el
@@ -77,6 +77,11 @@ Line is drawn between the ivy explorer window and the Echo
Area."
:group 'ivy-explorer
:type 'function)
+(defcustom ivy-explorer-message-function #'ivy-explorer--lv-message
+ "Function to be used for grid display."
+ :group 'ivy-explorer
+ :type 'function)
+
(defface ivy-explorer-separator
(if (featurep 'lv)
'((t (:inherit lv-separator)))
@@ -202,6 +207,8 @@ Even for the same string.")
(defun ivy-explorer--lv-message (str)
"Set ivy explorer window contents to string STR."
(let* ((n-lines (cl-count ?\n str))
+ (ivy-explorer-lv-force-update t)
+ (window-size-fixed nil)
deactivate-mark
golden-ratio-mode)
(with-selected-window (ivy-explorer--lv)
@@ -231,11 +238,6 @@ Even for the same string.")
(delete-window ivy-explorer--window)
(kill-buffer buf))))
-(defun ivy-explorer--message (message)
- "Show MESSAGE in `ivy-explorer--window'."
- (let ((ivy-explorer-lv-force-update t)
- (window-size-fixed nil))
- (ivy-explorer--lv-message message)))
;; * Minibuffer commands
@@ -501,11 +503,12 @@ Call the permanent action if possible.")
(mcols (car menu))
(mstring (cdr menu)))
(setq ivy-explorer--col-n mcols)
- (ivy-explorer--message mstring)))
+ (funcall ivy-explorer-message-function mstring)))
+
(defun ivy-explorer--internal (f &rest args)
"Invoke ivy explorer for F with ARGS."
- (let ((ivy-display-function #'ivy-explorer--display-function)
+ (let ((ivy-display-function #'ivy-explorer--display-function)
(ivy-posframe-hide-minibuffer nil)
(completing-read-function 'ivy-completing-read)
;; max number of candidates
- [elpa] externals/ivy-explorer updated (be8008b -> 5f9dafc), Clemens Radermacher, 2019/03/12
- [elpa] externals/ivy-explorer 4262a07 04/29: Ignore ivy-posframe-hide-minibuffer setting., Clemens Radermacher, 2019/03/12
- [elpa] externals/ivy-explorer 3325d82 02/29: Add bol/eol commands for grid (#6), Clemens Radermacher, 2019/03/12
- [elpa] externals/ivy-explorer 5161d5f 06/29: Remove unused ivy-explorer-lv-force-update variable, Clemens Radermacher, 2019/03/12
- [elpa] externals/ivy-explorer 545e0a9 05/29: Make message function a user option,
Clemens Radermacher <=
- [elpa] externals/ivy-explorer e7e2e4e 12/29: Improve posframe support, Clemens Radermacher, 2019/03/12
- [elpa] externals/ivy-explorer 918c133 11/29: Add row counter variable, Clemens Radermacher, 2019/03/12
- [elpa] externals/ivy-explorer 35ee473 13/29: Skip first line when parsing posframe buffer for avy, Clemens Radermacher, 2019/03/12
- [elpa] externals/ivy-explorer af08f55 03/29: Refactoring, Clemens Radermacher, 2019/03/12
- [elpa] externals/ivy-explorer 5475145 01/29: Add Elpa badge, Clemens Radermacher, 2019/03/12
- [elpa] externals/ivy-explorer 1da2e48 16/29: Increase default number of columns to 5, Clemens Radermacher, 2019/03/12
- [elpa] externals/ivy-explorer 4c19171 22/29: Add ivy-explorer-read function to read any colledtion with the grid, Clemens Radermacher, 2019/03/12
- [elpa] externals/ivy-explorer a30fc60 15/29: Actually respect the setting of `ivy-explorer-max-columns`, Clemens Radermacher, 2019/03/12
- [elpa] externals/ivy-explorer 4a48ec4 17/29: Add posframe screenshot, Clemens Radermacher, 2019/03/12
- [elpa] externals/ivy-explorer bc207da 10/29: Add basic posframe support for #7, Clemens Radermacher, 2019/03/12