From 15eb2ec114d3076a38438de13e8af878f5e3d950 Mon Sep 17 00:00:00 2001 From: Lars Magne Ingebrigtsen Date: Tue, 4 Nov 2014 00:46:20 +0100 Subject: [PATCH] eww readability tweak * net/eww.el (eww-score-readability): Don't count comments positively. --- lisp/ChangeLog | 2 ++ lisp/net/eww.el | 2 +- 2 files changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 8c98a77b08a..58cdd2093ca 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2014-11-03 Lars Magne Ingebrigtsen + * net/eww.el (eww-score-readability): Don't count comments positively. + * net/shr.el (shr-retransform-dom): Typo fix. * net/eww.el (eww-score-readability): Parse SVC images correctly. diff --git a/lisp/net/eww.el b/lisp/net/eww.el index 1eb00d302d5..c9bb903670e 100644 --- a/lisp/net/eww.el +++ b/lisp/net/eww.el @@ -452,7 +452,7 @@ the like." (defun eww-score-readability (node) (let ((score -1)) (cond - ((memq (car node) '(script head)) + ((memq (car node) '(script head comment)) (setq score -2)) ((eq (car node) 'meta) (setq score -1)) -- 2.39.5