[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
sb-zeit-de.el patch
- From: Andreas Seltenreich <seltenreich@xxxxxx>
- Date: Wed, 13 Dec 2006 07:01:15 +0100
- X-ml-name: emacs-w3m
- X-mail-count: 09006
Hi,
Attached is an update for sb-zeit-de.el.
Regarding the pending release: sb-welt-de, sb-n24-de and sb-laut-de
are currently dysfunctional too, however I don't think I can manage to
update them in time. Feel free to dispose them.
regards,
andreas
2006-12-13 Andreas Seltenreich <uwi7@xxxxxxxxxxxxxxxxxxx>
* shimbun/sb-zeit-de.el: Adapt to markup and group changes.
Index: sb-zeit-de.el
===================================================================
RCS file: /storage/cvsroot/emacs-w3m/shimbun/sb-zeit-de.el,v
retrieving revision 1.11
diff -c -r1.11 sb-zeit-de.el
*** sb-zeit-de.el 6 Jun 2006 03:35:50 -0000 1.11
--- sb-zeit-de.el 13 Dec 2006 05:37:01 -0000
***************
*** 21,26 ****
--- 21,32 ----
;; program's maintainer or write to: The Free Software Foundation,
;; Inc.; 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+ ;;; Commentary:
+
+ ;; Macro used to extract groups from the overview-page
+ ;; (fset 'sb-zeit-de-macro [?\C-s ?d ?e ?/ ?\C-m ?\C- ?\C-a ?\C-w ?\"
+ ;; ?\M-f ?\" ?\C-k ?\C-k ?\C-k return ?\C-k])
+
;;; Code:
(require 'shimbun)
***************
*** 29,38 ****
(luna-define-class shimbun-zeit-de (shimbun-rss) ())
(defvar shimbun-zeit-de-groups
! '("chancen" "dossier" "hochschule" "leben" "literatur" "media"
! "news" "politik" "reden" "reisen" "wirtschaft" "wissen"
! "wohlfuehlen" "zeitlaeufte"
! ))
(defvar shimbun-zeit-de-content-start
"title\">\\|<!--content starts here-->\\(?:<table[^>]+>\\)?")
--- 35,43 ----
(luna-define-class shimbun-zeit-de (shimbun-rss) ())
(defvar shimbun-zeit-de-groups
! '("auto" "computer" "deutschland" "feuilleton" "gesundheit"
! "international" "leben" "literatur" "musik" "news" "reisen"
! "schule" "sport" "studium" "wirtschaft" "wissen" "zuender"))
(defvar shimbun-zeit-de-content-start
"title\">\\|<!--content starts here-->\\(?:<table[^>]+>\\)?")
***************
*** 40,46 ****
(defvar shimbun-zeit-de-content-end
(concat
"</body>\\|</html>\\|navigation[^><]*>[^A]\\|"
! "<script language=\"JavaScript1\.2\" type=\"text/javascript\">"))
(defvar shimbun-zeit-de-from-address "DieZeit@xxxxxxx")
--- 45,52 ----
(defvar shimbun-zeit-de-content-end
(concat
"</body>\\|</html>\\|navigation[^><]*>[^A]\\|"
! "<script language=\"JavaScript1\.2\" type=\"text/javascript\">\\|"
! "<div[^>]+class=\"comments"))
(defvar shimbun-zeit-de-from-address "DieZeit@xxxxxxx")
***************
*** 95,100 ****
--- 101,107 ----
header)
;; remove advertisements and 1-pixel-images aka webbugs
+ (shimbun-remove-tags "<div[^>]*class=\"?\\(?:ad\\|most_read\\)" "</div>")
(shimbun-remove-tags "<a[^>]*doubleclick.net" "</a>")
(shimbun-remove-tags "<IFRAME[^>]*doubleclick.net[^>]*>")
(shimbun-remove-tags "<img[^>]*doubleclick.net[^>]*>")