xwidget-webkit isearch

This commit is contained in:
MitchMarq42 2023-01-12 16:30:47 -09:00
parent 167fbabecd
commit b276cb7c9b

View File

@ -897,6 +897,34 @@ Return nil if DIR is not in a hugo project at all."
;; ;; (require 'exwm-config)
;; ;; (exwm-config-example))
(elpaca nil
(use-package xwidget
:ensure nil
:commands xwidget-webkit-browse-url
:config
(defun mitch/webkit-isearch ()
(interactive)
(xwidget-webkit-search
(setq isearch-string
(read-from-minibuffer "Find in page: "))
(car xwidget-list)
'insensitive nil t))
(defun mitch/webkit-isearch-next ()
(interactive)
(xwidget-webkit-search isearch-string
(car xwidget-list) 'insensitive nil t))
(defun mitch/webkit-isearch-prev ()
(interactive)
(xwidget-webkit-search isearch-string
(car xwidget-list) 'insensitive t t))
;; (posframe-show ) ;; need posframe package
:general (general-define-key
:states 'normal
:keymaps 'xwidget-webkit-mode-map
"/" 'mitch/webkit-isearch
"n" 'mitch/webkit-isearch-next
"N" 'mitch/webkit-isearch-prev)))
(elpaca-use-package (ani-el
:repo "https://git.mitchmarq42.xyz/mitch/ani-el"
:files ("ani-el.el" "lib")))