eww readability tweak

* net/eww.el (eww-score-readability): Don't count comments positively.

2 files changed, 3 insertions, 1 deletions

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  <larsi@gnus.org>
 
+        * 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))