Add dynamic information to the paste micro-state

This commit is contained in:
syl20bnr 2015-03-08 00:18:29 -05:00
parent aedfe94b45
commit 61e4c78dd6

View file

@ -679,10 +679,14 @@ which require an initialization must be listed explicitly in the list.")
(defadvice evil-visual-paste (after spacemacs/evil-visual-paste activate)
"Initate the paste micro-state after the execution of evil-visual-paste"
(spacemacs/paste-micro-state))
(defun spacemacs//paste-ms-doc ()
"The documentation for the paste micro-state."
(format (concat "[%s/%s] Type [p] or [P] to paste the previous or "
"next copied text, [C-p] or [C-P] to paste the same "
"text before of after the point.")
(length kill-ring-yank-pointer) (length kill-ring)))
(spacemacs|define-micro-state paste
:doc (concat "Type [p] or [P] to paste the previous or "
"next copied text, [C-p] or [C-P] to paste the same text "
"before of after the point.")
:doc (spacemacs//paste-ms-doc)
:use-minibuffer t
:bindings
("p" evil-paste-pop)