[Mew-dist 15611] Re: sort error

[te-kun]

お世話になります、弓岡です。

From: NINOMIYA Hideyuki <nin at example.com>
Subject: [Mew-dist 15609] Re: sort error
Date: Sat, 23 Dec 2000 22:51:53 +0900

nin> 弓岡> b91 で sort をしようとすると、
nin> 弓岡> Wrong type argument: number-or-marker-p, (if (match-beginning 9) (let ((tmzn (substring s (match-beginning 9) (match-end 9))) int) (cond ((string-match "^[-+][0-9]+$" tmzn) (/ (string-to-int tmzn) 100)) ((setq int (mew-time-tmzn-str-to-int tmzn)) int) (t 0))) 0)
nin> 弓岡> となってしまいます。

nin> mew-func.el に
nin> (defsubst mew-time-rfc-tmzn ()
nin>   '(if (match-beginning 9) ...
nin> てのが在りますが
nin> (defsubst mew-time-rfc-tmzn ()
nin>   (if (match-beginning 9) ...
nin> だと思います。defmacro -> defsubst 変更時の修正もれかと...
直りました。ありがとうございます。