diff options
| -rw-r--r-- | lisp/net/eww.el | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/lisp/net/eww.el b/lisp/net/eww.el index fd9fe98439d..53835bb5440 100644 --- a/lisp/net/eww.el +++ b/lisp/net/eww.el | |||
| @@ -695,11 +695,12 @@ Currently this means either text/html or application/xhtml+xml." | |||
| 695 | (eww-handle-link dom) | 695 | (eww-handle-link dom) |
| 696 | (let ((start (point))) | 696 | (let ((start (point))) |
| 697 | (shr-tag-a dom) | 697 | (shr-tag-a dom) |
| 698 | (put-text-property start (point) | 698 | (if (dom-attr dom 'href) |
| 699 | 'keymap | 699 | (put-text-property start (point) |
| 700 | (if (mm-images-in-region-p start (point)) | 700 | 'keymap |
| 701 | eww-image-link-keymap | 701 | (if (mm-images-in-region-p start (point)) |
| 702 | eww-link-keymap)))) | 702 | eww-image-link-keymap |
| 703 | eww-link-keymap))))) | ||
| 703 | 704 | ||
| 704 | (defun eww--limit-string-pixelwise (string pixels) | 705 | (defun eww--limit-string-pixelwise (string pixels) |
| 705 | (if (not pixels) | 706 | (if (not pixels) |