[elpa] master 2e1cebc 036/348: counsel.el (counsel-bookmark): Add

[Oleh Krehel]

branch: master
commit 2e1cebc0c86e4de9127d928f7e9d3c94f28b96f3
Author: Ralph Gutkowski <address@hidden>
Commit: Ralph Gutkowski <address@hidden>

    counsel.el (counsel-bookmark): Add
---
 counsel.el | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/counsel.el b/counsel.el
index edab7c6..c54a433 100644
--- a/counsel.el
+++ b/counsel.el
@@ -515,6 +515,17 @@ Update the minibuffer with the amount of lines collected 
every
  'counsel-M-x
  'counsel-M-x-transformer)
 
+;;;###autoload
+(defun counsel-bookmark ()
+  "Forward to `bookmark-jump'."
+  (interactive)
+  (ivy-read "Jump to bookmark: "
+            (bookmark-all-names)
+            :action (lambda (x)
+                      (bookmark-jump x))
+            :require-match t
+            :caller 'counsel-bookmark))
+
 (defun counsel-M-x-transformer (cmd)
   "Return CMD appended with the corresponding binding in the current window."
   (let ((binding (substitute-command-keys (format "\\[%s]" cmd))))