diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/net/eww.el | 5 |
2 files changed, 8 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 795aa8026b3..8c196343e7e 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2013-12-16 Lars Magne Ingebrigtsen <larsi@gnus.org> | ||
| 2 | |||
| 3 | * net/eww.el (eww-display-html): If we can't find the anchor we're | ||
| 4 | looking for, then go to point-min. | ||
| 5 | |||
| 1 | 2013-12-16 Paul Eggert <eggert@cs.ucla.edu> | 6 | 2013-12-16 Paul Eggert <eggert@cs.ucla.edu> |
| 2 | 7 | ||
| 3 | Fix problems with CANNOT_DUMP and EMACSLOADPATH. | 8 | Fix problems with CANNOT_DUMP and EMACSLOADPATH. |
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 |