--- Begin Message ---
- From: emacs-w3m-admin@xxxxxxxxxx
- Date: Fri, 6 Jun 2003 15:36:14 +0900
- References: <uwufzd86t.wl@jellytones.goas.no-ip.org>
Mail from koichiro@meadowy.org
is rejected for 'one line mail body'.
Original mail as follows:
From owner-emacs-w3m@karin.namazu.org Fri Jun 6 15:36:12 2003
Return-Path: <owner-emacs-w3m@karin.namazu.org>
Delivered-To: emacs-w3m@namazu.org
Received: from mx.ctc-g.co.jp (ns.ctc-g.co.jp [131.248.58.1])
by karin.namazu.org (Postfix) with ESMTP id 8813F10B18
for <emacs-w3m@namazu.org>; Fri, 6 Jun 2003 15:36:09 +0900 (JST)
Received: by mx.ctc-g.co.jp (CTC-GN mail 11/07/98) id PAA23866; Fri, 6 Jun 2003 15:36:11 +0900 (JST)
Received: by mx1.ctc-g.co.jp (CTC-GN mail 04/16/98) id PAA02651; Fri, 6 Jun 2003 15:33:51 +0900
Received: by ctcs.ctc-g.co.jp (CTC-GN mail 08/15/01) id PAA25368; Fri, 6 Jun 2003 15:24:22 +0900
Received: (qmail 7948 invoked from network); 6 Jun 2003 06:35:59 -0000
Received: from unknown (HELO JELLYTONES.goas.no-ip.org) (131.248.174.113)
by 131.248.174.131 with SMTP; 6 Jun 2003 06:35:59 -0000
Date: Fri, 06 Jun 2003 15:35:54 +0900
Message-ID: <uwufzd86t.wl@jellytones.goas.no-ip.org>
From: Koichiro Ohba <koichiro@meadowy.org>
To: emacs-w3m@namazu.org
Subject: sb-tdiary.el
User-Agent: Wanderlust/2.11.3 (Wonderwall) SEMI/1.14.5 (Awara-Onsen) FLIM/1.14.5 (Demachiyanagi) APEL/10.4 Emacs/21.1 (i386-msvc-nt5.1.2600) MULE/5.0 (SAKAKI) Meadow/1.99 Alpha6-dev (IKADUCHI)
MIME-Version: 1.0 (generated by SEMI 1.14.5 - "Awara-Onsen")
Content-Type: multipart/mixed;
boundary="Multipart_Fri_Jun_06_15:35:54_2003-1"
X-Spam-Status: No, hits=-2.2 required=10.0 tests=ISO2022JP_BODY,CASHCASHCASH version=2.20
X-Spam-Level:
--Multipart_Fri_Jun_06_15:35:54_2003-1
Content-Type: text/plain; charset=ISO-2022-JP
最近の動向は追いかけられていない大場です。
shimbun から tDiary (http://www.tdiary.org/) の ML が読みたくなったので
backend を作ってみました。問題なければ後ほど commit しようと思いますが、
いかがでしょうか。
--Multipart_Fri_Jun_06_15:35:54_2003-1
Content-Type: text/plain;; charset=US-ASCII
Content-Description: sb-tdiary.el
;;; sb-tdiary.el --- shimbun backend for www.tDiary.org
;; Copyright (C) 2003 Koichiro Ohba <koichiro@meadowy.org>
;; Author: Koichiro Ohba <koichiro@meadowy.org>
;; Keywords: news
;; This file is a part of shimbun.
;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation; either version 2, or (at your option)
;; any later version.
;; This program is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.
;; You should have received a copy of the GNU General Public License
;; along with this program; if not, you can either send email to this
;; program's maintainer or write to: The Free Software Foundation,
;; Inc.; 59 Temple Place, Suite 330; Boston, MA 02111-1307, USA.
;;; Commentary:
;; Original code was sb-airs.el which is written by
;; Yuuichi Teranishi <teranisi@gohome.org>
;;; Code:
(require 'shimbun)
(require 'sb-mhonarc)
(luna-define-class shimbun-tdiary (shimbun-mhonarc) ())
(defconst shimbun-tdiary-group-path-alist
'(("devel" "archive/devel" "tDiary-devel@lists.sourceforge.net")
("theme" "archive/theme" "tDiary-theme@lists.sourceforge.net")))
(defvar shimbun-tdiary-url "http://www.tdiary.org/")
(defvar shimbun-tdiary-groups (mapcar 'car shimbun-tdiary-group-path-alist))
(defvar shimbun-tdiary-reverse-flag nil)
(defvar shimbun-tdiary-litemplate-regexp
"<strong><a name=\"\\([0-9]+\\)\" href=\"\\(msg[0-9]+.html\\)\">\\([^<]+\\)</a></strong>,\n <em>\\([^<]+\\)</em>")
(defmacro shimbun-tdiary-concat-url (shimbun url)
(` (concat (shimbun-url-internal (, shimbun))
(nth 1 (assoc (shimbun-current-group-internal (, shimbun))
shimbun-tdiary-group-path-alist))
"/"
(, url))))
(luna-define-method shimbun-index-url ((shimbun shimbun-tdiary))
(shimbun-tdiary-concat-url shimbun "index.html"))
(luna-define-method shimbun-reply-to ((shimbun shimbun-tdiary))
(nth 2 (assoc (shimbun-current-group-internal shimbun)
shimbun-tdiary-group-path-alist)))
(provide 'sb-tdiary)
;;; sb-tdiary.el ends here
--Multipart_Fri_Jun_06_15:35:54_2003-1
Content-Type: text/plain; charset=US-ASCII
--
koichiro <koichiro@meadowy.org>
--Multipart_Fri_Jun_06_15:35:54_2003-1--
--- End Message ---