Re: shimbun makes me genki: sb-zeit-de.el and sb-n24-de.el

[Katsumi Yamaoka <yamaoka@xxxxxxx>]

Hi,

Thanks for your contribution!

>>>>> In [emacs-w3m : No.06852]
>>>>>	Andreas Seltenreich <seltenreich@gmx.de> wrote:

> Hallo,

> attached are two more german shimbun backends. sb-zeit-de.el, a german
> Newspaper and sb-n24-de.el, a TV Channel, both inheriting from
> sb-rss. It would be nice if the files find their way into CVS.

sb-n24-de.el looks complete to me, so I'd like to install it in
CVS.  I won't use it because I cannot read German, though. :-p

OTOH, sb-zeit-de.el shows the time when headers have been fetched
by a user, in the Date headers.  Isn't it able to improve so that
it shows the date when the article was written, at least when
possible?  Here's a quick hack:

(luna-define-method shimbun-make-contents :before ((shimbun shimbun-zeit-de)
						   header)
  (when (re-search-forward "(c) ZEIT\\.de, \
\\([0-3][0-9]\\)\\.\\([01][0-9]\\)\\.\\(20[0-9][0-9]\\)"
			   nil t)
    (shimbun-header-set-date
     header
     (shimbun-make-date-string (string-to-number (match-string 3))
			       (string-to-number (match-string 2))
			       (string-to-number (match-string 1))
			       nil
			       "+02:00"))
    (goto-char (point-min))))

Best regards,
-- 
Katsumi Yamaoka <yamaoka@jpl.org>