commit dda01e9022356207b1f964b4274dc5812469a942 parent e95f9e072c0ebfcc6a79e0f8653ea95248c31b2f Author: Tomas Hlavaty <tom@logand.com> Date: Sun, 8 Dec 2024 10:29:57 +0100 add zsposepneho Diffstat:
| M | email-eww.el | | | 16 | ++++++++++++++++ |
1 file changed, 16 insertions(+), 0 deletions(-)
diff --git a/email-eww.el b/email-eww.el @@ -294,6 +294,20 @@ (delete-region (point) (point-max)) (message-goto-body)) +(defun clean-up-zsposepneho () + (forward-line 1) + (let ((start (point))) + (search-forward "Publikováno" nil t) + (beginning-of-line) + (backward-paragraph 2) + (delete-region (point) start)) + (goto-char (point-max)) + (search-backward "Rychle k cíli" nil t) + (beginning-of-line) + (forward-line -1) + (delete-region (point) (point-max)) + (message-goto-body)) + (defun clean-up-euractiv () (forward-line 1) (let ((start (point))) @@ -393,6 +407,8 @@ (clean-up-commondreams)) ((string-match "wsws.org" url) (clean-up-wsws)) + ((string-match "zsposepneho.cz" url) + (clean-up-zsposepneho)) ((string-match "euractiv.com" url) (clean-up-euractiv)) ((string-match "infomigrants.net" url)