Re: sb-infoshop.el fix

[David Hansen <david.hansen@xxxxxxx>]

On Sat, 03 Nov 2007 02:11:34 +0100 David Hansen wrote:

> Hello,

sorry about the noise

2007-11-03  David Hansen  <david.hansen@xxxxxxx>

	* sb-infoshop.el (shimbun-rss-build-message-id): Fix format of
          the Message-Id.

Index: sb-infoshop.el
===================================================================
RCS file: /storage/cvsroot/emacs-w3m/shimbun/sb-infoshop.el,v
retrieving revision 1.4
diff -c -r1.4 sb-infoshop.el
*** sb-infoshop.el	3 Nov 2007 04:01:16 -0000	1.4
--- sb-infoshop.el	5 Nov 2007 01:47:28 -0000
***************
*** 1,6 ****
  ;;; sb-infoshop.el --- infoshop shimbun backend
  
! ;; Copyright (C) 2005, 2006 David Hansen
  
  ;; Author: David Hansen <david.hansen@xxxxxxxxxxxxxxxxxxx>
  ;; Keywords: news
--- 1,6 ----
  ;;; sb-infoshop.el --- infoshop shimbun backend
  
! ;; Copyright (C) 2005, 2006, 2007 David Hansen
  
  ;; Author: David Hansen <david.hansen@xxxxxxxxxxxxxxxxxxx>
  ;; Keywords: news
***************
*** 46,52 ****
  (luna-define-method shimbun-rss-build-message-id :around
      ((shimbun shimbun-infoshop) url &optional date)
    (if (string-match "\\?story=\\(.*+\\)$" url)
!       (match-string 1 url)
      (luna-call-next-method)))
  
  (luna-define-method shimbun-get-headers :around ((shimbun shimbun-infoshop)
--- 46,52 ----
  (luna-define-method shimbun-rss-build-message-id :around
      ((shimbun shimbun-infoshop) url &optional date)
    (if (string-match "\\?story=\\(.*+\\)$" url)
!       (concat "<" (match-string 1 url) "@news.infoshop.org>")
      (luna-call-next-method)))
  
  (luna-define-method shimbun-get-headers :around ((shimbun shimbun-infoshop)


Diffs between working revision and workfile end here.