[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: sb-heise.el update
eek, that diff was in the wrong direction, this one looks better :-)
--8<---------------cut here---------------start------------->8---
*** /home/andreas/backup/emacs/!home!andreas!src!elisp!sb-heise.el.~3~ 2004-12-07 15:22:43.000000000 +0100
--- sb-heise.el 2004-12-08 01:11:48.000000000 +0100
***************
*** 101,107 ****
(let ((author (concat (match-string 1) " <invalid@heise.de>"))
(date (match-string 2)) (id))
(setq url (w3m-expand-url url shimbun-heise-url))
! (string-match "/[0-9]+/[0-9]+/" url)
(setq id (concat "<telepolis" (match-string 0 url) "@heise.de>"))
(when (shimbun-search-id shimbun id)
(throw 'stop nil))
--- 101,107 ----
(let ((author (concat (match-string 1) " <invalid@heise.de>"))
(date (match-string 2)) (id))
(setq url (w3m-expand-url url shimbun-heise-url))
! (string-match "/\\w+/[0-9]+/" url)
(setq id (concat "<telepolis" (match-string 0 url) "@heise.de>"))
(when (shimbun-search-id shimbun id)
(throw 'stop nil))
--8<---------------cut here---------------end--------------->8---
embarrassed,
Andreas