emacs
/
evil-collection
mirror of https://github.com/jojojames/evil-collection.git
1
0
Fork 0
Code Issues Releases Wiki Activity

[xwidget] Add X (from vimium) to restore last closed tab

This commit is contained in:
James Nguyen 2022-05-21 21:33:22 -04:00
parent 377ef179b3
commit 4bbe042e97
1 changed files with 15 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
modes/xwidget/evil-collection-xwidget.el
View File

@ -63,12 +63,26 @@ F is the name of function, N is the pixel height."
(interactive "s(New Tab) xwidget-webkit URL: ")
(xwidget-webkit-browse-url url :new-session))
(defvar evil-collection-xwidget-webkit-last-closed-tab-url nil)
(defun evil-collection-xwidget-webkit-close-tab ()
"Close tab (kill buffer) without confirmation."
(interactive)
(setq evil-collection-xwidget-webkit-last-closed-tab-url
(xwidget-webkit-uri (xwidget-webkit-current-session)))
(let ((kill-buffer-query-functions nil))
(kill-this-buffer)))
(defun evil-collection-xwidget-webkit-restore-last-closed-tab ()
"Restore last closed tab."
(interactive)
(if (null evil-collection-xwidget-webkit-last-closed-tab-url)
(message "No url to restore.")
(message (format "Restoring last closed tab %s"
evil-collection-xwidget-webkit-last-closed-tab-url))
(xwidget-webkit-browse-url
evil-collection-xwidget-webkit-last-closed-tab-url :new-session)
(setq evil-collection-xwidget-webkit-last-closed-tab-url nil)))
(defun evil-collection-xwidget-webkit-search-tabs ()
"Search tabs (buffers) with 'buffer-name'."
(interactive)
@ -130,6 +144,7 @@ F is the name of function, N is the pixel height."
;; Only 'new-tab' and 'close-tab' are supported.
"t" 'evil-collection-xwidget-webkit-new-tab
"x" 'evil-collection-xwidget-webkit-close-tab
"X" 'evil-collection-xwidget-webkit-restore-last-closed-tab
;; Miscellaneous
"?" 'describe-mode