[Emacs-diffs] trunk r118284: eww readability tweak

[Lars Ingebrigtsen]

------------------------------------------------------------
revno: 118284
revision-id: address@hidden
parent: address@hidden
committer: Lars Magne Ingebrigtsen <address@hidden>
branch nick: trunk
timestamp: Tue 2014-11-04 00:46:20 +0100
message:
  eww readability tweak
  
  * net/eww.el (eww-score-readability): Don't count comments positively.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/net/eww.el                eww.el-20130610114603-80ap3gwnw4x4m5ix-1

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2014-11-03 22:59:07 +0000
+++ b/lisp/ChangeLog    2014-11-03 23:46:20 +0000
@@ -1,5 +1,7 @@
 2014-11-03  Lars Magne Ingebrigtsen  <address@hidden>
 
+       * 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.

=== modified file 'lisp/net/eww.el'
--- a/lisp/net/eww.el   2014-11-03 22:58:02 +0000
+++ b/lisp/net/eww.el   2014-11-03 23:46:20 +0000
@@ -452,7 +452,7 @@
 (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))