email-eww

commit 2c4fe79d8ccbac336885daa1bb3af67cd35c075b
parent 7b6f766fddc3f4fcc9028db8bc61d0dfad126bef
Author: Tomas Hlavaty <tom@logand.com>
Date:   Sun, 18 Jun 2023 01:03:59 +0200

update clean-up-ycombinator

Diffstat:
M
email-eww.el
 | 
6
+++---

1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/email-eww.el b/email-eww.el
@@ -39,7 +39,7 @@
     (message-goto-to)))
 
 (defun clean-up-ycombinator ()
-  (next-line)
+  (forward-line)
   (kill-line 2)
   (cond
    ((search-forward "Ask HN" nil t)
@@ -51,12 +51,12 @@
     (cond
      ((search-forward "add comment" nil t)
       (beginning-of-line)
-      (next-line)
+      (forward-line)
       (delete-region start (point)))
      ))
   (goto-char (point-max))
   (search-backward "reply")
-  (next-line)
+  (forward-line)
   (delete-region (point) (point-max))
   (message-goto-body)
   (unless (bolp)