[Mew-Win32 02914] Re: b92.

早間義博 yossi at example.com
2000年 12月 26日 (火) 17:41:16 JST


From: Hideyuki SHIRAI (白井秀行) <shirai at example.com>
Subject: [Mew-Win32 02912] Re: b92.
Date: Tue, 26 Dec 2000 16:35:05 +0900 (JST)
Message-ID: <20001226.163505.46610662.shirai at example.com>

> 
> にしむら>   立ち上げ時の POP Password: のことですか??  なら今まで通り聞いてきま
> にしむら> すが.....(違うことなんだろうか??)
> 
> にしむら>   ちなみに Windows2000Pro/Meadow1.10 ですが...(^^;
> 
> Win2000 とか NT で Meadow-1.13b1 ですが、自分で *おまじない* を
> しない限り passwd を聞いてきますよ。
> 
> にしむら> # でもきっと変わらないと思う。
> 
> この辺りは、Win でも UNIX でも一緒ですね。
> POP がうまくうごいているなら、早間さんがおまじないをかけている?
> 

UNIX ではおまじないが解らず色々実行しました。Win では何もしないの
におまじないがあるとは、見えない物は解らない。

いつも間違った場合は「ごく普通に」なんですが、
私もごく普通に 
(1)Meadow--1.13b1-i386.tar.gz をインストールし、
    1.10 から b90 を機に変更しました。
(2)b90 をインストールし、 mew -s を実行し、ちょっと変更
    
---------------------------- ここから ---------------------------
;;; Mew Easy Settings (generated automatically)
(setq load-path		; Meadow
      (cons (expand-file-name (concat exec-directory "../../site-lisp/mew"))
	       load-path))

(mw32-ime-initialize)
(setq default-input-method "MW32-IME")
(set-keyboard-coding-system 'sjis)

(setq mew-use-overlay-keymap nil)
        (setq mew-config-alist
              '(("default"
                 ("user" . "user")
                 ("name" . "My Name")
                 ("inbox-folder" . "+inbox")
                 ("smtp-msgid-domain" . "My.domain")
                 ("mail-domain" . "Mail.domain")
                 ("dcc" . "My.Mailaddress at example.com")
                 ("msgid-domain" . "My.domain")
		 ("smtp-server" . "smtyserver.My.domain")
		("pop-auth" . pass)
		("pop-server" . "smtpserver.My.domain")
		("pop-user" . "user")
		("pop-delete" . t)
		 )

	       )
	      )

(setq mew-use-folders-file-p t)
(setq mew-scan-form-mark-review nil)
  (setq mew-scan-form-mark-delete nil)  ;; t
  (setq mew-scan-form-mark-review nil)
  (setq mew-scan-form-size-0k t)  ;; nil
  (setq mew-scan-form-list-string-type 'regex)
  (setq mew-scan-form-list-list-type 'regex)  ;; 'recursive
(defun demangle-subject ()
  (let ((count 0))
    (save-excursion
      (beginning-of-buffer)
      (re-search-forward "^Subject: " (point-max) t)
      ; eliminate "[mailing-list:count] "
      (save-excursion
        (while (re-search-forward "\\[[-a-zA-Z0-9.]+[ :][0-9]+\\] *"
                                  (save-excursion (end-of-line) (point)) t)
          (replace-match "")))
      ; eliminate "Re"
      (while (looking-at "R[Ee]\\(\\^[0-9]+\\|\\[[0-9]+\\]\\)*: *")
        (replace-match "")
        (setq count (+ count 1)))
      (and (> count 0) (insert mew-reply-string)))))

(add-hook 'mew-draft-mode-hook 'demangle-subject)

(setq mew-mail-address "My.Mailaddress at example.com")
(setq mew-mail-domain-list '("My.domain"))

(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-cc  nil)
;(setq mew-fcc "+Backup")

;; modify Cc:
;(setq mew-replyto-to-list '("Reply-To:"))
;(setq mew-replyto-cc-list '("To:" "Apparently-To:"))

;; offline mode
;(setq mew-auto-get         nil)
;(setq mew-auto-flush-queue t)

;; printing (for Meadow or Mule for Windows)
(setq mew-w32-prog-print     "notepad.exe")
(setq mew-w32-prog-print-arg "/p")
(if (featurep 'meadow)
    (setq mew-w32-cs-print       'shift_jis-dos)  ; Meadow/Japanese
  (setq mew-w32-cs-print       *sjis*dos))        ; Mule for Win32/Japanese
(define-process-argument-editing "/notepad\.exe$"
  (lambda (x)
    (general-process-argument-editing-function x nil t)))

;; caesar decryption
;(add-hook 'mew-init-hook (lambda () (require 'mew-caesar)))

;; virtual threading
;(eval-after-load "mew" '(require 'mew-virtual-thread))

;; colorful highlighting
(eval-after-load "mew" '(require 'mew-cite-color))

;; Another Mew search method, powered by Namazu.
(eval-after-load "mew" '(require 'mew-nmz))
(setq mew-nmz-use-backslash t)

;; browse-url
(require 'mew-browse)
(define-key global-map [S-mouse-2] 'browse-url-at-mouse)

;; password caching
;(setq mew-use-cached-passwd         t) ; imget's password
;(setq mew-use-pgp-cached-passphrase t) ; PGP/GPG's passphrase
;(setq mew-passwd-timer-unit 10) ; timer-unit x lifetime
;(setq mew-passwd-lifetime   2)  ;    = interval(min) of flushing cache.
---------------------------- ここまで ---------------------------

(3)b91 をインストールして安心していたら
    このときも「POP の パスワードを聞いてもらえなかった」です。
(4)b92 がでて、b92 をインストールしたのです。
(5) meadow を実行し、M-x mew と指定すると次のとおりです。
   *Messages の内容が
---------------------------- ここから ---------------------------
("c:/WIN32APP/MEADOW/1.13B1/site-lisp"
"c:/WIN32APP/MEADOW/1.13B1/site-lisp/emu"
"C:/WIN32APP/MEADOW/site-lisp"
"c:/WIN32APP/MEADOW/site-lisp/apel"
"c:/WIN32APP/MEADOW/site-lisp/flim"
"c:/WIN32APP/MEADOW/site-lisp/gnus"
"c:/WIN32APP/MEADOW/site-lisp/mew"
"c:/WIN32APP/MEADOW/site-lisp/semi"
"C:/WIN32APP/MEADOW/1.13B1/lisp"
"c:/WIN32APP/MEADOW/1.13B1/lisp/textmodes"
"c:/WIN32APP/MEADOW/1.13B1/lisp/progmodes"
"c:/WIN32APP/MEADOW/1.13B1/lisp/play"
"c:/WIN32APP/MEADOW/1.13B1/lisp/mail"
"c:/WIN32APP/MEADOW/1.13B1/lisp/language"
"c:/WIN32APP/MEADOW/1.13B1/lisp/international"
"c:/WIN32APP/MEADOW/1.13B1/lisp/emulation"
"c:/WIN32APP/MEADOW/1.13B1/lisp/emacs-lisp"
"c:/WIN32APP/MEADOW/1.13B1/lisp/calendar"
"C:/WIN32APP/MEADOW/1.13B1/leim")

(C:\WIN32APP\MEADOW\1.13B1\BIN\MEADOW95.EXE)
Loading encoded-kb...
Loading encoded-kb...done
Loading easymenu...
Loading easymenu...done
Loading advice...
Loading advice...done
For information about the GNU Project and its goals, type C-h C-p.
Setting Mew world ... 
Loading ~/.mew...
Loading ~/.mew...done
Updating status ...   done
Loading timer...
Loading timer...done
Setting Mew world ... done
Connecting to the POP server ... done
Communicating with the POP server ... 
No new message
Flushing +queue ... 
Connecting to smtp.server with smtp port ... done
Sending in background ... 
Loading pp...
Loading pp...done
1.wrk has been queued to +queue/1 (550 Can not speak with you
)
---------------------------- ここまで ---------------------------

使用した SMTP サーバは今外部(?)からは何も受け付けない設定なのです。
だからまだメールを送っていません。
 .mew を読んでいますが、これは .emacs の
  (setq mew-use-overlay-keymap nil)
から
(add-hook 'mew-draft-mode-hook 'demangle-subject)
と同じ内容です。 .mew を設定しても変わらないので .emacs にも書いて
みました。
ここのどこに「呪文」があるのでしょう。

早間



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