[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master aca4d7cfc4: Keep point in eww after hitting `g'
From: |
Lars Ingebrigtsen |
Subject: |
master aca4d7cfc4: Keep point in eww after hitting `g' |
Date: |
Mon, 26 Sep 2022 07:21:17 -0400 (EDT) |
branch: master
commit aca4d7cfc40272065de15980698770f939068b67
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Keep point in eww after hitting `g'
* lisp/net/eww.el (eww-retrieve): Keep point after hitting `g'
(bug#58076).
---
lisp/net/eww.el | 8 +++-----
1 file changed, 3 insertions(+), 5 deletions(-)
diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index 34e74f8ffa..af938e3c19 100644
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -415,13 +415,11 @@ For more information, see Info node `(eww) Top'."
(defun eww-retrieve (url callback cbargs)
(cond
((null eww-retrieve-command)
- (url-retrieve url #'eww-render
- (list url nil (current-buffer))))
+ (url-retrieve url #'eww-render cbargs))
((eq eww-retrieve-command 'sync)
- (let ((orig-buffer (current-buffer))
- (data-buffer (url-retrieve-synchronously url)))
+ (let ((data-buffer (url-retrieve-synchronously url)))
(with-current-buffer data-buffer
- (eww-render nil url nil orig-buffer))))
+ (apply #'eww-render nil url cbargs))))
(t
(let ((buffer (generate-new-buffer " *eww retrieve*"))
(error-buffer (generate-new-buffer " *eww error*")))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master aca4d7cfc4: Keep point in eww after hitting `g',
Lars Ingebrigtsen <=