[Mew-Win32 02317] オフラインでの使用について

atashiro at example.com atashiro at example.com
1999年 12月 21日 (火) 15:42:59 JST


こんにちは、帯広の田代です。

使用環境
WIN98において
Mule for win32 window Version 1.22(MOMIJI)
MEW 1.94.1
を使用しています。
 
 私は接続環境がダイアルアップなものでmewをつかいオフラインでメールを
書いています。

先ず、実際の私の操作手順としては下記の通りです。

1Muleの起動からmewを起動、
2i を叩くとダイヤルアップ接続の画面が出て
3「接続」
4メールを受信。このときqueueに送信メールがあれば、送信。
5ダイヤルアップ切断(手動)
6受信したメールを読む
7メールを書く
8C-cでメールをqueueディレクトリーへ
9サマリーモードからiを叩く
(あとは、上記2〜5と続く)

 1〜6までは特に問題となるようなことも無く、使用できています。ところ
が、7でメールを書きそのまま送信しようと8〜5(とループして)と実行で
きることを期待しているのですが、3で止まってしまうか上手く行っても4の
メールの受信までしか行きません。

 私の操作手順が悪いのでしょうか、それとも.emacsの書き方が悪いのでしょうか。
 教えていただきたくポストしました。

.emacsのmew該当部分は下記のとおりです。(見よう見真似で継ぎはぎだらけ
で恥ずかしい)

(if (file-exists-p
     (concat exec-directory "../site-lisp/mew"))
    (setq load-path		; Mule for Windows and site-lisp exists
	  (cons (expand-file-name (concat exec-directory "../site-lisp/mew"))
		load-path))
  (setq load-path		; Mule for Windows and site-lisp do not exist
	(cons (expand-file-name (concat exec-directory "../lisp")) load-path)))
(setq mew-mail-address "atashiro at example.com")
(setq mew-mail-domain-list '("hokkai.or.jp"))
(autoload 'mew "mew" nil t)
(autoload 'mew-send "mew" nil t)
(autoload 'mew-user-agent-compose "mew" nil t)
(if (boundp 'mail-user-agent)
    (setq mail-user-agent 'mew-user-agent))
(if (fboundp 'define-mail-user-agent)
    (define-mail-user-agent
      'mew-user-agent
      'mew-user-agent-compose
      'mew-draft-send-letter
      'mew-draft-kill
      'mew-send-hook))
(setq mew-fcc "+outbox")
(setq mew-prog-imls-arg-list '("--thread=yes"))
(add-hook 'mew-draft-mode-newdraft-hook
	  (function
	   (lambda ()
	     (let ((p (point)))
	       (goto-char (point-max))
	       (insert-file "~/Mail/foo")
	       (goto-char p)))))
(setq mew-mail-address-list '("atashiro at example.com"))
(add-hook 'mew-draft-mode-hook 'delete-other-windows)
(setq mew-replyto-to-list '("Reply-To:"))
(setq mew-replyto-cc-list '("Cc:" "Apparently-To:"))
(setq mew-noreplyto-cc-list '("Cc:" "Apparently-To:"))
(setq mew-auto-get nil)
(setq mew-auto-flush-queue t)
(eval-after-load "mew" '(require 'mew-virtual-thread))
(eval-after-load "mew" '(require 'mew-cite-color))


------------------------------------
Akira Tashiro
       E-mail:atashiro at example.com
------------------------------------ 





Mew-win32 メーリングリストの案内