[Mew-Win32 01630] mew-summary-flush-queue

[河田 彰規]

こんばんわ、河田＠江戸川橋です。

いつも、自宅のダイアルアップ環境で　mew-offline + rascon を
便利に使わせて頂いてますが、ときどき思い余って、
mew-summary-flush-queue (C-c C-c) をやってしまうことがあります。
(Win98 上でこれをやると、結構ブルーになります...)

そこで、mew-offline に以下のような感じのコードを
追加して頂きたいのですが、いかがなものでしょうか ? ＞ 北口さん



(add-hook 'mew-summary-mode-hook
	  (lambda ()
	    (progn
	      (define-key mew-summary-mode-map "\C-c\C-c"
		   'mew-offline-summary-flush-queue)
	      )))

(defun mew-offline-summary-flush-queue ()
  (interactive)
  (if (and mew-offline-dialup-p mew-offline-use-rascon)
      (progn
		(rascon-generate-entry-table)
		(if (not rascon-mode-indicator)
			(rascon-dialup))))
  (if (or (not mew-offline-use-rascon) rascon-mode-indicator)
	  (mew-summary-flush-queue))
  (if (and mew-offline-hangup-p
	   mew-offline-use-rascon)
      (progn
	(rascon-generate-entry-table)
	(if rascon-mode-indicator
	    (rascon-hangup)))))



# user meeting いいなあ...
# 私もぜひぜひ参加したいです。
# 飲み会と聞くとつい反応してしまう :-)

o--o
o 河田 彰規（かわた あきのり）
o kawata-a at example.com
o--o--o--o--o--o--o--o--o--o--o