Commit 5480b8ef authored by Juri Linkov's avatar Juri Linkov

Multi-page isearch support in eww

* lisp/net/eww.el (eww-isearch-next-buffer): New function.
(eww-mode): Set multi-isearch-next-buffer-function to it.
http://lists.gnu.org/archive/html/emacs-devel/2014-12/msg02300.html
parent 0d7f85fb
2014-12-30 Juri Linkov <juri@linkov.net>
* net/eww.el (eww-isearch-next-buffer): New function.
(eww-mode): Set multi-isearch-next-buffer-function to it.
2014-12-30 Dmitry Gutov <dgutov@yandex.ru>
* progmodes/xref.el (xref-find-definitions): Mention "no
......
......@@ -705,6 +705,8 @@ the like."
(setq-local tool-bar-map eww-tool-bar-map))
;; desktop support
(setq-local desktop-save-buffer 'eww-desktop-misc-data)
;; multi-page isearch support
(setq-local multi-isearch-next-buffer-function 'eww-isearch-next-buffer)
(setq truncate-lines t)
(buffer-disable-undo)
(setq buffer-read-only t))
......@@ -1885,6 +1887,19 @@ Otherwise, the restored buffer will contain a prompt to do so by using
(add-to-list 'desktop-buffer-mode-handlers
'(eww-mode . eww-restore-desktop))
;;; Isearch support
(defun eww-isearch-next-buffer (&optional buffer wrap)
"Go to the next page to search using `rel' attribute for navigation."
(if wrap
(condition-case nil
(eww-top-url)
(error nil))
(if isearch-forward
(eww-next-url)
(eww-previous-url)))
(current-buffer))
(provide 'eww)
;;; eww.el ends here
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment