Re: Setting 'pop3-leave-mail-on-server' for each server

From what I can tell, no version of pop3.el or epop3 supports SSL

I'll be happy to test this as soon as I can get a fix for my other problem ... I can't access one of my POP3 servers at all because they (AT&T) switched to an SSL port. I've found some references to pop3s and stunnel, but nothing clear enough for me to procede on. Once I can find out how to use SSL with gnus, I'll be back to test this out. Thanks, -pd At 05:27 PM 03/29/2002, Andy Piper wrote: >Patched file attached. > >andy > > > -----Original Message----- > > From: xemacs-beta-admin(a)xemacs.org > > [mailto:xemacs-beta-admin＠xemacs.org]On Behalf Of Peter Davis > > Sent: Monday, March 04, 2002 5:19 AM > > To: xemacs-beta(a)xemacs.org > > Subject: Setting 'pop3-leave-mail-on-server' for each server > > > > > > This bug report will be sent to the XEmacs Development Team, > > not to your local site managers!! > > Please write in English, because the XEmacs maintainers do not have > > translators to read other languages for them. > > > > > > Please describe as succinctly as possible: > > - What happened. > > - What you thought should have happened. > > - Precisely what you were doing at the time. > > > > Please also include any C or lisp back-traces that you may have. > > ================================================================ > > Dear Bug Team! > > > > I'm trying to use the 'pop3-leave-mail-on-server' feature selectively, > > so that I leave mail on some POP3 servers, but delete it from others. > > I've tried the code below. However, for any server that calls > > 'pop3-delete-on', I simply get no messages from that server. The > > messages are left on the server, but they never show up in my nnml > > groups. (I'm using gnus 5.8.8). If I later switch the :prescript for > > that server back to 'pop3-delete-off', I get the backlogged messages. > > > > Here's the code in my .gnus file for this: > > ;;;;;;;;;;;;;;; > > ;These functions enable/disable POP3 expunging for XEmacs > > (defun pop3-delete-on () > > (interactive) > > (message "Deleting mail from POP3 server.") > > (setq pop3-leave-mail-on-server nil)) > > > > (defun pop3-delete-off () > > (interactive) > > (message "Leaving mail on POP3 server.") > > (setq pop3-leave-mail-on-server t)) > > > > (if (string-match "XEmacs\\|Lucid" emacs-version) > > ( > > setq nnmail-movemail-program 'pop3-nnmail-movemail > > pop3-leave-mail-on-server t > > nnmail-spool-file '("po:peter_davis＠mediaone.net" > > "po:pd＠world.std.com" > > "po:pdavis＠bitstream.com" > > ) > > mail-sources '((pop :server "pop.ne.mediaone.net" > > :user "peter_davis" > > :prescript pop3-delete-off) > > (pop :server "pop.theworld.com" > > :user "pd" > > :prescript pop3-delete-on) > > (pop :server "mail.bitstream.com" > > :user "pdavis" > > :prescript pop3-delete-off) > > ) > > ;;pop3-uidl-file-name "d:/home/.uidls" > > ) > > ; ... > > ) > > ;;;;;;;;;;;;;;; > > > > I do see the messages, so I know these functions are being called. > > However, the pop3-delete-on function seems to completely disable that > > server somehow. > > > > Is the value of pop3-leave-mail-on-server cached somehow? Is there > > some other way I could code this to get the desired effect? > > > > Thanks, > > > > -pd > > > > > > > > > > > > ================================================================ > > > > System Info to help track down your bug: > > --------------------------------------- > > > > OS version: > > > > Microsoft Windows 2000 [Version 5.00.2195] > > OS: Windows_NT > > > > XEmacs 21.4.6 \"Common Lisp (Windows [1])\" configured for > > `i586-pc-win32'. > > > > Building XEmacs in \"f:\\xemacs\\xemacs-21.4-release\\nt\". > > Using compiler \"cl -nologo -W3 -O2 -G5 -ML\". > > Installing XEmacs in \"c:\\Program Files\\XEmacs\\XEmacs-21.4.6\". > > Package path is \"~\\.xemacs;;c:\\Program > > Files\\XEmacs\\site-packages;c:\\Program Files\\XEmacs\\xemacs-packages\". > > Compiling in support for Microsoft Windows native GUI. > > Compiling in support for XPM images. > > Compiling in support for GIF images. > > Compiling in support for PNG images. > > Compiling in support for TIFF images. > > Compiling in support for JPEG images. > > Compiling in support for X-Face message headers. > > Compiling in support for toolbars. > > Compiling in support for dialogs. > > Compiling in support for widgets. > > Compiling in support for native sounds. > > Compiling in fast dired implementation. > > Using minimal tagbits. > > Using indexed lrecord implementation. > > Using portable dumper. > > > > > > Load-Path Lisp Shadows: > > ---------------------- > > (d:\HOME\emacsdir\records-1.4.8\records > > ~/emacsdir/records-1.4.9/records > > d:\HOME\emacsdir\records-1.4.8\records-vars > > ~/emacsdir/records-1.4.9/records-vars > > d:\HOME\emacsdir\records-1.4.8\records-util > > ~/emacsdir/records-1.4.9/records-util > > d:\HOME\emacsdir\records-1.4.8\records-search > > ~/emacsdir/records-1.4.9/records-search > > d:\HOME\emacsdir\records-1.4.8\records-load > > ~/emacsdir/records-1.4.9/records-load > > d:\HOME\emacsdir\records-1.4.8\records-index > > ~/emacsdir/records-1.4.9/records-index > > d:\HOME\emacsdir\records-1.4.8\records-dindex > > ~/emacsdir/records-1.4.9/records-dindex d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\browse-url > > ~/emacsdir\browse-url ~/emacsdir\tex-site d:\Program > > Files\XEmacs\xemacs-packages\lisp\auctex\tex-site ~/emacsdir\dbx > > d:\Program Files\XEmacs\xemacs-packages\lisp\debug\dbx d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\pop3 d:\Program > > Files\XEmacs\xemacs-packages\lisp\gnus\pop3 ~/emacsdir\biff-mode > > d:\Program Files\XEmacs\xemacs-packages\lisp\gnus\biff-mode d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\starttls d:\Program > > Files\XEmacs\xemacs-packages\lisp\mail-lib\starttls d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\smtpmail d:\Program > > Files\XEmacs\xemacs-packages\lisp\mail-lib\smtpmail d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\sendmail d:\Program > > Files\XEmacs\xemacs-packages\lisp\mail-lib\sendmail d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\rmailout d:\Program > > Files\XEmacs\xemacs-packages\lisp\mail-lib\rmailout d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\rmail-mini d:\Program > > Files\XEmacs\xemacs-packages\lisp\mail-lib\rmail-mini d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\rfc822 d:\Program > > Files\XEmacs\xemacs-packages\lisp\mail-lib\rfc822 d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\rfc2104 d:\Program > > Files\XEmacs\xemacs-packages\lisp\mail-lib\rfc2104 d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\reporter d:\Program > > Files\XEmacs\xemacs-packages\lisp\mail-lib\reporter d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\pop3 d:\Program > > Files\XEmacs\xemacs-packages\lisp\mail-lib\pop3 d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\mailheader d:\Program > > Files\XEmacs\xemacs-packages\lisp\mail-lib\mailheader d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\mail-utils d:\Program > > Files\XEmacs\xemacs-packages\lisp\mail-lib\mail-utils d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\mail-extr d:\Program > > Files\XEmacs\xemacs-packages\lisp\mail-lib\mail-extr d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\mail-abbrevs d:\Program > > Files\XEmacs\xemacs-packages\lisp\mail-lib\mail-abbrevs d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\highlight-headers > > d:\Program > > Files\XEmacs\xemacs-packages\lisp\mail-lib\highlight-headers > > d:/Program Files/XEmacs/xemacs-packages/lisp/mail-lib\browse-url > > d:\Program Files\XEmacs\xemacs-packages\lisp\mail-lib\browse-url > > d:/Program > > Files/XEmacs/xemacs-packages/lisp/mail-lib\browse-url-xemacs > > d:\Program > > Files\XEmacs\xemacs-packages\lisp\mail-lib\browse-url-xemacs > > d:/Program Files/XEmacs/xemacs-packages/lisp/mail-lib\base64 > > d:\Program Files\XEmacs\xemacs-packages\lisp\mail-lib\base64 > > ~/emacsdir\metamail d:\Program > > Files\XEmacs\xemacs-packages\lisp\net-utils\metamail > > ~/emacsdir\postscript d:\Program > > Files\XEmacs\xemacs-packages\lisp\prog-modes\postscript d:\Program > > Files\XEmacs\xemacs-packages\lisp\ps-print\ps-print d:\Program > > Files\XEmacs\xemacs-packages\lisp\ps-print-nomule\ps-print > > ~/emacsdir\gnuserv d:\PROGRA~1\XEmacs\XEmacs-21.4.6\lisp\gnuserv) > > > > > > Installed XEmacs Packages: > > ------------------------- > > > > ((zenirc:version 1.13 :type regular) > > (xslt-process :version 1.06 :type regular) > > (xemacs-devel :version 1.4 :type single-file) > > (xemacs-base :version 1.58 :type regular) > > (w3 :version 1.21 :type regular) > > (vm :version 7.02 :type regular) > > (viper :version 1.31 :type regular) > > (view-process :version 1.11 :type regular) > > (vhdl :version 1.15 :type regular) > > (vc-cc :version 1.18 :type regular) > > (vc :version 1.3 :type regular) > > (tramp :version 1.02 :type regular) > > (tpu :version 1.12 :type regular) > > (tooltalk :version 1.13 :type regular) > > (tm :version 1.3 :type regular) > > (time :version 1.11 :type regular) > > (textools :version 1.12 :type regular) > > (text-modes :version 1.37 :type single-file) > > (texinfo :version 1.2 :type regular) > > (supercite :version 1.19 :type regular) > > (strokes :version 1.08 :type regular) > > (speedbar :version 1.22 :type regular) > > (sounds-wav :version 1.1 :type regular) > > (sounds-au :version 1.1 :type regular) > > (slider :version 1.13 :type regular) > > (sieve :version 1.01 :type regular) > > (sh-script :version 1.13 :type regular) > > (sgml :version 1.08 :type regular) > > (semantic :version 1.11 :type regular) > > (scheme :version 1.11 :type regular) > > (rmail :version 1.13 :type regular) > > (reftex :version 1.24 :type regular) > > (psgml :version 1.26 :type regular) > > (ps-print-nomule :version 1.05 :type regular) > > (ps-print :version 1.02 :type regular) > > (prog-modes > > :version > > 1 > > .49 > > :type > > single-file) > > (pcomplete :version 1.01 :type regular) > > (pcl-cvs :version 1.58 :type regular) > > (pc :version 1.21 :type single-file) > > (os-utils :version 1.26 :type single-file) > > (net-utils :version 1.23 :type single-file) > > (misc-games :version 1.15 :type single-file) > > (mine :version 1.14 :type regular) > > (mh-e :version 1.14 :type regular) > > (mew :version 1.16 :type regular) > > (mailcrypt :version 2.11 :type regular) > > (mail-lib :version 1.43 :type regular) > > (jde :version 1.32 :type regular) > > (ispell :version 1.24 :type regular) > > (ilisp :version 1.2 :type regular) > > (igrep :version 1.08 :type regular) > > (idlwave :version 1.24 :type regular) > > (hm--html-menus :version 1.17 :type regular) > > (gnus :version 1.58 :type regular) > > (gnats :version 1.13 :type regular) > > (games :version 1.13 :type regular) > > (fsf-compat :version 1.1 :type single-file) > > (frame-icon :version 1.09 :type regular) > > (forms :version 1.14 :type regular) > > (footnote :version 1.13 :type regular) > > (eudc :version 1.35 :type regular) > > (eterm :version 1.13 :type regular) > > (eshell :version 1.02 :type regular) > > (emerge :version 1.09 :type regular) > > (elib :version 1.1 :type single-file) > > (eieio :version 1.02 :type regular) > > (eicq :version 1.05 :type regular) > > (efs :version 1.27 :type regular) > > (edt :version 1.12 :type regular) > > (edit-utils :version 1.76 :type single-file) > > (ediff :version 1.35 :type regular) > > (edebug :version 1.14 :type regular) > > (dired :version 1.11 :type regular) > > (dictionary :version 1.06 :type regular) > > (debug :version 1.14 :type regular) > > (crisp :version 1.12 :type regular) > > (cookie :version 1.13 :type regular) > > (clearcase :version 1.02 :type regular) > > (cc-mode :version 1.27 :type regular) > > (calendar :version 1.18 :type regular) > > (calc :version 1.18 :type regular) > > (c-support :version 1.16 :type single-file) > > (build :version 1.05 :type regular) > > (bbdb :version 1.17 :type regular) > > (auctex :version 1.29 :type regular) > > (apel :version 1.2 :type regular) > > (ada :version 1.1 :type regular) > > (Sun :version 1.13 :type regular)) > > > > > > Features: > > -------- > > > > (hsmail xemacsbug shadow bbdb-gui flyspell ispell bbdb-com mail-extr > > gnus-picon w3-forms w3-display w3-imap w3-widget css font w3-mouse > > w3-vars w3-cus w3-keyword url mm mule-sysdp url-parse url-vars sort > > smiley annotations gnus-cite gnus-async gnus-score score-mode gnus-ml > > disp-table gnus-topic pop3 env passwd nnml nndraft nnmh nndoc > > nnvirtual gnus-msg gnus-art mm-uu mm-view gnus-cache nntp nnoo > > bytecomp byte-compile gnus-sum gnus-group gnus-undo nnmail mail-source > > format-spec gnus-start gnus-range gnus-spec gnus-int gnus-win > > font-lock efs-cu records-util records records-autoloads records-dindex > > records-index records-vars bbdb-gnus gnus gnus-ems gnus-xmas bbdb > > timezone hyperbole hmouse-key h-skip-bytec hmouse-drv hypb hact hhist > > hvar set hversion w32-shellex browse-url message messagexmas mml > > mm-decode mm-encode mailcap mm-bodies uudecode mail-parse rfc2045 > > rfc2231 rfc2047 gnus-util qp ietf-drums time-date parse-time > > mail-abbrevs nnheader nnheaderxm mm-util mail-prsvr mail-utils > > mailheader vm-autoload highlight-headers vm-vars vm-startup vm-version > > vm smtpmail time-stamp sendmail rfc822 advice advice-preload cc-mode > > cc-align cc-cmds cc-engine cc-styles cc-langs cc-vars wid-edit > > cus-face cc-menus imenu cc-defs zenirc-autoloads > > xslt-process-autoloads xemacs-devel-autoloads xemacs-base-autoloads > > w3-autoloads vm-autoloads viper-autoloads view-process-autoloads > > vhdl-autoloads vc-cc-autoloads vc-autoloads tramp-autoloads > > tpu-autoloads tooltalk-autoloads tm-autoloads time-autoloads > > textools-autoloads text-modes-autoloads texinfo-autoloads > > supercite-autoloads strokes-autoloads speedbar-autoloads > > sounds-wav-autoloads sounds-au-autoloads slider-autoloads > > sieve-autoloads sh-script-autoloads sgml-autoloads semantic-autoloads > > scheme-autoloads rmail-autoloads reftex-autoloads psgml-autoloads > > ps-print-nomule-autoloads ps-print-autoloads prog-modes-autoloads > > pcomplete-autoloads pcl-cvs-autoloads pc-autoloads os-utils-autoloads > > net-utils-autoloads misc-games-autoloads mine-autoloads mh-e-autoloads > > mew-autoloads mailcrypt-autoloads mail-lib-autoloads jde-autoloads > > ispell-autoloads ilisp-autoloads igrep-autoloads idlwave-autoloads > > hm--html-menus-autoloads gnus-autoloads gnats-autoloads > > games-autoloads fsf-compat-autoloads frame-icon-autoloads > > forms-autoloads footnote-autoloads eudc-autoloads eterm-autoloads > > eshell-autoloads emerge-autoloads elib-autoloads eieio-autoloads > > eicq-autoloads efs-autoloads edt-autoloads edit-utils-autoloads > > ediff-autoloads edebug-autoloads dired-autoloads dictionary-autoloads > > debug-autoloads crisp-autoloads cookie-autoloads clearcase-autoloads > > cc-mode-autoloads calendar-autoloads calc-autoloads > > c-support-autoloads build-autoloads bbdb-autoloads auctex-autoloads > > apel-autoloads ada-autoloads Sun-autoloads lisp-autoloads loadhist > > auto-show fontl-hooks code-cmds gutter-items menubar-items x-menubar > > dragdrop mode-motion mouse itimer auto-save lisp-mode easymenu > > iso8859-1 page buff-menu lib-complete help-nomule cus-file derived > > frame text-props obsolete cus-start custom widget cl-extra mini-cl cl > > cl-19 packages backquote very-early-lisp file-coding > > mswindows-scrollbars mswindows toolbar native-sound scrollbar > > network-streams subprocesses menu-accelerator-support menubar md5 > > xemacs gutter tiff png gif jpeg xface xpm xbm lisp-float-type > > windows-nt dragdrop-api dialog devices window-system base64) > > > > > > Recent keystrokes: > > ----------------- > > > > l SPC d a t a SPC b i t s . RET RET T h a n k SPC y > > o u . RET RET - p d C-c C-c n n n n d n d d n n n n > > q up up up up up up up up up up # # S l 1 RET M-< M-x > > x e m SPC r e SPC BS BS b u SPC SPC BS BS BS BS BS > > BS BS BS BS e SPC BS BS r e p o SPC r SPC x e SPC TAB > > RET > > > > > > Recent messages (most recent first): > > ----------------------------------- > > > > Parsing d:\HOME\.mailrc... > > Loading xemacsbug...done > > Loading xemacsbug... > > Making completion list... > > Making completion list... > > Changed level of nnml:amazon.art from 3 to 1 > > Changed level of nnml:amazon.assoc from 3 to 1 > > No more unread articles (Type n for comp.lang.postscript [3]) > > Generating summary...done > > Generating summary... > > Sorting threads...done > > Sorting threads... > > Scoring...done > > Scoring... > > Fetching headers for nnml:scbwi.ne.admin...done > > Fetching headers for nnml:scbwi.ne.admin... > > Retrieving newsgroup: nnml:scbwi.ne.admin... > > Expiring articles...done > > Expiring articles... > > No more unread articles (Type n for nnml:scbwi.ne.admin [2]) > > > > > > > > > > > > -- > > -------- > > Peter Davis Pageflex Inc > > 617-520-8345 215 First Street > > 617-868-4732 (FAX) Cambridge, MA 02142 > > pdavis(a)pageflexinc.com http://www.pageflexinc.com > > > > -------- Peter Davis Pageflex Inc 617-520-8345 215 First Street 617-868-4732 (FAX) Cambridge, MA 02142 pdavis(a)pageflexinc.com http://www.pageflexinc.com