Browse files

Merge pull request #118 from watkinsr/master

add: function to bookmark current-url
  • Loading branch information...
jmercouris committed Aug 23, 2018
2 parents f43cae6 + a3d1c12 commit ccc289b44610ada4ae9c875910af7720e85b546b
Showing with 5 additions and 0 deletions.
  1. +5 −0 next/source/bookmark.lisp
@@ -45,6 +45,11 @@
(with-result (url (read-from-minibuffer (mode *minibuffer*)))
(%bookmark-url url)))
(define-command bookmark-url-from-buffer ()
"Allow the user to bookmark a URL from the current active buffer."
(let ((url (interface:web-view-get-url (view *active-buffer*))))
(%bookmark-url url)))
(define-command bookmark-delete ()
"Delete a bookmark from the bookmark database."
(with-result (bookmark (read-from-minibuffer

0 comments on commit ccc289b

Please sign in to comment.