>>693
+1 すらしてないバージョン
(setq navi2ch-message-sendlog-message-format-function
'navi2ch-message-sendlog-message-format-with-last-num)
(defun navi2ch-message-sendlog-message-format-with-last-num
(message subject url board article)
(let ((num (when (buffer-live-p navi2ch-message-current-article-buffer)
(with-current-buffer navi2ch-message-current-article-buffer
(number-to-string (length navi2ch-article-message-list))))))
(format "Subject: %s\nURL: %s%s\n\n%s" subject url (or num "") message)))