[xyzzy:08520] Re: KaMail の番号振り直し機能に間して

[OHKUBO KOHEI <kuboon@xxxxxxxxxxxxx>]

加藤木さんのを、8511に紹介されているToy さんのと組み合わせて、


(defun kamail-renumber-all ()
  (interactive)
  (kamail-auto-refile nil nil)       ;自動振り分け
  (let ((*kamail-default-read-number*
	 (values
	  (local-stat
	   (kamail-folder-local-name *kamail-folder-current*)))))
    (declare (special *kamail-default-read-number*))
    (kamail-list-reload t))         ;ここまでで、全部リスト
  (kamail-summary-sort-by-date)     ;ソート
  (kamail-renumber))                ;番号付け直し


こうかな？

                       /*  OHKUBO KOHEI <kuboon@xxxxxxxxxxxxx>
                                         http://kuboon.fly.to/