[mew-dist 22655] Re: mew年と曜日の変数名

[Toshi Nagata]

竹川さん、ご返事ありがとうございます。
>(defun mew-scan-form-youbi ()
>  (let ((s (MEW-DATE)))
>    (when (>= (length s) 3)
>      (setq s (substring s 0 3)))
>    (cdr
>     (assoc s
>            '(("Mon" . "月")
>              ("Tue" . "火")
>              ("Wed" . "水")
>              ("Thu" . "木")
>              ("Fri" . "金")
>              ("Sat" . "土")
>              ("Sun" . "日"))))))
>(setq mew-scan-form
>      '(type (5 date) "(" (2 youbi) ")[" (5 time) "]" (-4 size) " "
>             t (14 from) " " (0 subj)))
の事は知っています。これは、英語の曜日を和文に直しているだけで、英文の曜日が入っていないメールでは
空白になります。その為、年月日から曜日を計算しようと思いますが、年と月日の変数名が分からなく、
lispが完成しません。変数名が分かれば完成すると思うのですが、それとももっと良い方法があれば
教えて下さい。よろしくお願いします。
__________________________________________________
Do You Yahoo!?
Yahoo! BB is Broadband by Yahoo!  http://bb.yahoo.co.jp/