diff options
| author | Lars Magne Ingebrigtsen | 2013-12-17 00:29:47 +0100 |
|---|---|---|
| committer | Lars Magne Ingebrigtsen | 2013-12-17 00:29:47 +0100 |
| commit | 11bade0ad817db903e01f78960cc6fcd8c8a40d1 (patch) | |
| tree | ece1e7c1448e7f3082475c8c80a71e401bba0ad0 /lisp/net | |
| parent | 8fb8c4f3735ac3b1b61bd3472a7ba2ad35d1dad5 (diff) | |
| download | emacs-11bade0ad817db903e01f78960cc6fcd8c8a40d1.tar.gz emacs-11bade0ad817db903e01f78960cc6fcd8c8a40d1.zip | |
eww anchor pointer movement fixup
* net/eww.el (eww-display-html): If we can't find the anchor we're
looking for, then go to point-min.
Diffstat (limited to 'lisp/net')
| -rw-r--r-- | lisp/net/eww.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/net/eww.el b/lisp/net/eww.el index 34c6728ba9e..afcd2ecb391 100644 --- a/lisp/net/eww.el +++ b/lisp/net/eww.el | |||
| @@ -271,8 +271,9 @@ word(s) will be searched for via `eww-search-prefix'." | |||
| 271 | (shr-target-id | 271 | (shr-target-id |
| 272 | (let ((point (next-single-property-change | 272 | (let ((point (next-single-property-change |
| 273 | (point-min) 'shr-target-id))) | 273 | (point-min) 'shr-target-id))) |
| 274 | (when point | 274 | (goto-char (if point |
| 275 | (goto-char (1+ point))))) | 275 | (1+ point) |
| 276 | (point-min))))) | ||
| 276 | (t | 277 | (t |
| 277 | (goto-char (point-min))))) | 278 | (goto-char (point-min))))) |
| 278 | (setq eww-current-url url | 279 | (setq eww-current-url url |