From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/6651 Path: main.gmane.org!not-for-mail From: Richard Pieri Newsgroups: gmane.emacs.gnus.general Subject: Re: Gnus v5.2.15 is released Date: 12 Jun 1996 16:51:29 -0400 Message-ID: References: NNTP-Posting-Host: coloc-standby.netfonds.no X-Trace: main.gmane.org 1035147076 4341 80.91.224.250 (20 Oct 2002 20:51:16 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 20:51:16 +0000 (UTC) Return-Path: ding-request@ifi.uio.no Original-Received: from spork.callamer.com (root@spork.callamer.com [199.74.141.2]) by deanna.miranova.com (8.7.5/8.6.9) with ESMTP id OAA19401 for ; Wed, 12 Jun 1996 14:57:48 -0700 Original-Received: from ifi.uio.no (ifi.uio.no [129.240.64.2]) by spork.callamer.com (8.7.5/8.7.3) with SMTP id OAA11911 for ; Wed, 12 Jun 1996 14:56:17 -0700 (PDT) Original-Received: from unilab.dfci.harvard.edu (unilab.dfci.harvard.edu [155.52.46.57]) by ifi.uio.no with ESMTP (8.6.11/ifi2.4) id for ; Wed, 12 Jun 1996 22:52:03 +0200 Original-Received: (from ratinox@localhost) by unilab.dfci.harvard.edu (8.7.5/8.7.3) id QAA14205; Wed, 12 Jun 1996 16:51:30 -0400 (EDT) Original-To: ding@ifi.uio.no In-Reply-To: Lars Magne Ingebrigtsen's message of 11 Jun 1996 06:49:47 +0200 Original-Lines: 51 X-Mailer: Gnus v5.2.15/XEmacs 19.13 Xref: main.gmane.org gmane.emacs.gnus.general:6651 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:6651 >>>>> "LMI" == Lars Magne Ingebrigtsen writes: LMI> Bug fixes and POP password support. POP password support will break efs. Here is an *UNTESTED* patch that will use efs' passwd.el if it exists, then ange-ftp's password reading. Assuming it works :). *** nnmail.el.orig Wed Jun 12 16:38:46 1996 --- nnmail.el Wed Jun 12 16:45:57 1996 *************** *** 269,276 **** ;;; Internal variables. (eval-and-compile ! (autoload 'ange-ftp-read-passwd "ange-ftp")) (defvar nnmail-split-fancy-syntax-table (copy-syntax-table (standard-syntax-table)) --- 269,281 ---- ;;; Internal variables. + ;; use efs's passwd.el if it exists, otherwise use ange-ftp's function (eval-and-compile ! (cond ((load "passwd" t) ! (fset 'nnmail-read-passwd 'read-passwd)) ! (t ! (autoload 'ange-ftp-read-passwd "ange-ftp") ! (fset 'nnmail-read-passwd 'ange-ftp-read-passwd)))) (defvar nnmail-split-fancy-syntax-table (copy-syntax-table (standard-syntax-table)) *************** *** 378,384 **** (setq password nnmail-pop-password) (when (and nnmail-pop-password-required (not nnmail-pop-password)) (setq password ! (ange-ftp-read-passwd (format "Password for %s: " (substring inbox (+ popmail 3)))))) (message "Getting mail from post office ...")) --- 383,389 ---- (setq password nnmail-pop-password) (when (and nnmail-pop-password-required (not nnmail-pop-password)) (setq password ! (nnmail-read-passwd (format "Password for %s: " (substring inbox (+ popmail 3)))))) (message "Getting mail from post office ..."))