«前の日記(2009.07.22 / Wednesday) 最新 次の日記(2009.07.24 / Friday)» 編集

Hena Hena Nikki

2003|05|06|07|08|09|10|11|12|
2004|01|02|03|04|05|06|07|08|09|10|11|12|
2005|01|02|03|04|05|06|07|08|09|10|11|12|
2006|01|02|03|04|05|06|07|08|09|10|11|12|
2007|01|02|03|04|05|06|07|08|09|10|11|12|
2008|01|02|03|04|05|06|07|08|09|10|11|12|
2009|01|02|03|04|05|06|07|08|09|10|11|12|
2010|01|02|03|04|05|06|07|08|09|10|11|12|
2011|01|02|03|04|05|06|07|08|10|11|12|
2012|01|02|03|04|05|06|07|08|10|12|
2013|01|02|04|06|

2009.07.23 / Thursday [長年日記]

* [computer/update] Becky! Internet Mail ver.2.51.03

Windows では定番の message user agent。

* [computer/emacsen] wanderlust で GMail 風、新着レス順にソート

mtbr さんの blog の記事。

~/.wl に追加しておくと、 Summary モード -> "S" の候補に "reply-date" が出る。

これを選んでやると Summary が GMail 風にソートされる。

(defun wl-summary-overview-entity-compare-by-reply-date (a b)
  "Compare entity X and Y by latest date of replies."
  (flet ((string-max2
          (x y)
          (cond ((string< x y) y)
                ('t x)))
         (elmo-entity-to-number
          (x)
          (elt (cdr x) 0))
         (thread-number-get-date
          (x)
          (timezone-make-date-sortable (elmo-msgdb-overview-entity-get-date (elmo-message-entity wl-summary-buffer-elmo-folder x))))
         (thread-get-family
          (x)
          (cons x (wl-thread-entity-get-descendant (wl-thread-get-entity x))))
         (max-reply-date
          (x)
          (cond ((eq 'nil x)
                 'nil)
                ((eq 'nil (cdr x))
                 (thread-number-get-date (car x)))
                ('t
                 (string-max2 (thread-number-get-date (car x))
                              (max-reply-date (cdr x)))))))
    (string<
     (max-reply-date (thread-get-family (elmo-entity-to-number a)))
     (max-reply-date (thread-get-family (elmo-entity-to-number b))))))
(add-to-list 'wl-summary-sort-specs 'reply-date)

  • この日記には本日 名の方が訪問してくださっているようです。 また、昨日は 名の方が訪問してくださったようです。
  • この日記の更新情報の取得には antenna.lirs を利用するのがおすすめです。