From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: "Ehud Karni" Newsgroups: gmane.emacs.help Subject: Re: multiple pop-boxes in emacs Date: Mon, 16 Feb 2004 16:18:24 +0200 Organization: Mivtach-Simon Insurance agencies Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Message-ID: <200402161418.i1GEIO87017080@beta.mvs.co.il> References: <20040216.133052.74747377.emacs@onecht.net> Reply-To: ehud@unix.mvs.co.il NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-8-i Content-Transfer-Encoding: 7bit X-Trace: sea.gmane.org 1076942389 13264 80.91.224.253 (16 Feb 2004 14:39:49 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Mon, 16 Feb 2004 14:39:49 +0000 (UTC) Cc: help-gnu-emacs@gnu.org Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Mon Feb 16 15:39:43 2004 Return-path: Original-Received: from monty-python.gnu.org ([199.232.76.173]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1AsjfU-0004Pj-00 for ; Mon, 16 Feb 2004 15:24:16 +0100 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.24) id 1AsjdB-0004wG-4I for geh-help-gnu-emacs@m.gmane.org; Mon, 16 Feb 2004 09:21:53 -0500 Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.24) id 1AsjbN-0003Cu-2K for help-gnu-emacs@gnu.org; Mon, 16 Feb 2004 09:20:01 -0500 Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.24) id 1AsjaB-0001W4-89 for help-gnu-emacs@gnu.org; Mon, 16 Feb 2004 09:19:19 -0500 Original-Received: from [192.114.178.12] (helo=unix.mvs.co.il) by monty-python.gnu.org with esmtp (Exim 4.24) id 1AsjZv-0001DA-KU for help-gnu-emacs@gnu.org; Mon, 16 Feb 2004 09:18:31 -0500 Original-Received: from beta.mvs.co.il (beta [10.253.0.3]) by unix.mvs.co.il (8.12.10/8.12.10) with ESMTP id i1GEIQDD009575 for ; Mon, 16 Feb 2004 16:18:26 +0200 Original-Received: from beta.mvs.co.il (localhost [127.0.0.1]) by beta.mvs.co.il (8.12.10/8.12.10) with ESMTP id i1GEIQkg017084 for ; Mon, 16 Feb 2004 16:18:26 +0200 Original-Received: (from root@localhost) by beta.mvs.co.il (8.12.10/8.12.10/Submit) id i1GEIO87017080; Mon, 16 Feb 2004 16:18:24 +0200 Original-To: emacs@onecht.net In-reply-to: <20040216.133052.74747377.emacs@onecht.net> (message from Daan Hoogland on Mon, 16 Feb 2004 13:30:52 +0000 (GMT)) X-Mailer: Emacs 21.3.1 rmail (send-msg 1.108) X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.2 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: main.gmane.org gmane.emacs.help:16897 X-Report-Spam: http://spam.gmane.org/gmane.emacs.help:16897 -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 On Mon, 16 Feb 2004 13:30:52 +0000 (GMT), Daan Hoogland wrote: > > I currently using mew. I want to open several mailboxes through > pop3/pop3s or imap/imaps. I don't seem to be able to do this with > mew. Can anybody tell me if this is at all possible with a emacs mail > reader? I use rmail and have defined a command that adds the mail from a pop account into the rmail buffer. (defun rmail-get-new-mail-from-pop (pop-host pop-user pop-pass) "Get mail from pop server into current rmail file Accepts 3 parameters (strings): POP-HOST - host name of pop server POP-USER - login name of mail user POP-PASS - password of mail account" (interactive "sPOP host name: \nsUser name: \nsMail password: ") (let ((sv-host (getenv "MAILHOST")) (sv-p-inbox rmail-primary-inbox-list) (sv-pass rmail-pop-password) (rmail-pop-password-required (not (null pop-pass))) ) (setq rmail-primary-inbox-list (list (concat "po:" pop-user))) (rmail-set-pop-password pop-pass) (setenv "MAILHOST" pop-host) ;; pop host name (rmail) ;; get mail from pop (rmail) (setq rmail-primary-inbox-list sv-p-inbox) (setq rmail-pop-password sv-pass) (setenv "MAILHOST" sv-host))) ;; restore host name I also defined a command for each of my pop mailbox like this: (defun read-pop-acct-1 () "pop mail from account 1" (interactive) (require 'rmail) (rmail-get-new-mail-from-pop "pop.host.url" "acct" "passwd")) Ehud. - -- Ehud Karni Tel: +972-3-7966-561 /"\ Mivtach - Simon Fax: +972-3-7966-667 \ / ASCII Ribbon Campaign Insurance agencies (USA) voice mail and X Against HTML Mail http://www.mvs.co.il FAX: 1-815-5509341 / \ GnuPG: 98EA398D Better Safe Than Sorry -----BEGIN PGP SIGNATURE----- Comment: use http://www.keyserver.net/ to get my key (and others) iD8DBQFAMNEvLFvTvpjqOY0RAj43AJ47t4WhS9NozAud7J1dSPQ/g6r0aACfZRdk xbZeFiQPdZ1qQaoOD7/4134= =Lofa -----END PGP SIGNATURE-----