[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master f133336a1a 1/5: Exclude radio buttons when suggesting URI in eww
From: |
Lars Ingebrigtsen |
Subject: |
master f133336a1a 1/5: Exclude radio buttons when suggesting URI in eww |
Date: |
Mon, 4 Jul 2022 07:08:46 -0400 (EDT) |
branch: master
commit f133336a1afc45f4329eb8ed8a1e0e319a4691d9
Author: Visuwesh <visuweshm@gmail.com>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Exclude radio buttons when suggesting URI in eww
* lisp/net/eww.el (eww-links-at-point): Exclude radio links.
(bug#56366).
---
lisp/net/eww.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index 3c16942e7c..1671e062b2 100644
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -932,9 +932,9 @@ The renaming scheme is performed in accordance with
(defun eww-links-at-point ()
"Return list of URIs, if any, linked at point."
- (remq nil
- (list (get-text-property (point) 'shr-url)
- (get-text-property (point) 'image-url))))
+ (seq-filter #'stringp
+ (list (get-text-property (point) 'shr-url)
+ (get-text-property (point) 'image-url))))
(defun eww-view-source ()
"View the HTML source code of the current page."