[mew-dist 21774] mew-net-status3

[NAKAMURA Motonori]

私も(?) Note PC の乗り換え作業中なのですが、mew 3.0.67 をインストール
してみました。で、膨大にメールが保存されているフォルダを scan すると
1通ずつの進行状況が表示されてうるさいので、ちょっと間引くコードに
なっていると良いかなと思いました。どうでしょう。

---
中村 素典 / 京都大学 学術情報メディアセンター
motonori at example.com


--- mew-net.el-	Wed Sep 25 05:47:48 2002
+++ mew-net.el	Thu Sep 26 00:27:25 2002
@@ -68,7 +68,10 @@
 (defun mew-net-status3 (buf rttl rcnt)
   (when mew-use-net-status
     (if rttl
-	(mew-net-status buf "Scanning" (format "%d/%d" rcnt rttl))
+	(if (and (< 500 rttl) (< rcnt (- rttl 100)))
+	    (if (= 0 (% rcnt 20))
+	      (mew-net-status buf "Scanning" (format "%d/%d" rcnt rttl)))
+	  (mew-net-status buf "Scanning" (format "%d/%d" rcnt rttl)))
       (mew-net-status buf "Scanning" (format "%d" rcnt)))))
 
 (defun mew-summary-visible-buffer (buf)