Problem in package-get.el (was I think the xemacs FTP package directory is fouled up...)

Hi, I tried your patch, but it does not fix packages updating on my system (logs below). What does fix the problem is the patch by Dan Holmsand: ------------------------ cut here ------------------------ Index: lisp/package-get.el =================================================================== RCS file: /usr/CVSroot/XEmacs/xemacs/lisp/package-get.el,v retrieving revision 1.13.2.28 diff -u -r1.13.2.28 package-get.el --- package-get.el 2000/06/14 20:24:03 1.13.2.28 +++ package-get.el 2000/07/10 13:22:21 ＠＠ -400,7 +400,7 ＠＠ (save-excursion (set-buffer buf) (erase-buffer buf) - (insert-file-contents-literally db-file) + (insert-file-contents-internal db-file) (package-get-update-base-from-buffer buf) (if (file-remote-p db-file) (package-get-maybe-save-index db-file))) ------------------------ cut here ------------------------ After some debugging it seems clear what the problem is (at least on my system; as not many other people have this problems I may be missing something in the big picture). The insert-file-contents-literally function makes sure nothing much happens when a file is loaded, in particular it clears the `file-name-handler-alist' - which as far as I can see is *the* thing that handles efs file names (it contains 3 efs-*-handler-function entries). Clearing this (if I understand correctly) results in XEmacs trying to open a filename like "/anonymous＠ftp.xemacs.org:/pub/xemacs/packages/package-index.LATEST.pgp" as if it were a local file name (w/out using efs) - which fails. So it looks to me that Dan Holmsand's patch is doing the right thing. Or the insert-file-contents-literally should leave `file-name-handler-alist' alone. What is the expert opinion on this? Thanks. (I'm using XEmacs 21.2.34/35 cygwin under w2k). Here are the logs: Error log: ------------------------ cut here ------------------------ Signaling: (file-error "Opening input file" "No such file or directory" "/anonymous＠ftp.xemacs.org:/pub/xemacs/packages/package-index.LATEST.pgp") signal(file-error ("Opening input file" "No such file or directory" "/anonymous＠ftp.xemacs.org:/pub/xemacs/packages/package-index.LATEST.pgp")) byte-code("..." [run-hook-with-args insert-file-contents-error-hook filename visit err signal] 5) insert-file-contents("/anonymous＠ftp.xemacs.org:/pub/xemacs/packages/package-index.LATEST.pgp" nil nil nil nil) insert-file-contents-literally("/anonymous＠ftp.xemacs.org:/pub/xemacs/packages/package-index.LATEST.pgp") package-get-update-base(nil t) package-get-require-base(t) #<compiled-function nil "...(152)" [package-get-require-base t get-buffer-create pui-info-buffer "===============================================================================\n" nil start sep-string outbuf message "Creating package list ..." sit-for 0 buffer-read-only buffer-disable-undo erase-buffer kill-all-local-variables use-local-map pui-display-keymap list-packages-mode major-mode "Packages" mode-name truncate-lines package-get-remote "\nWarning: No download sites specified. Package index may be out of date.\n If you intend to install packages, specify download sites first.\n\n" pui-list-verbose " Latest Installed\n Package name Vers. Vers. Description\n" " Latest\n Package name Vers. Description\n" mapcar #<compiled-function ... "...(217)" ... 10> sort copy-sequence package-get-base #<compiled-function ... "...(10)" ... 3> documentation set-buffer-modified-p pop-to-buffer delete-other-windows pui-selected-packages pui-deleted-packages featurep menubar set-buffer-menubar current-menubar add-submenu pui-menu mode-popup-menu clear-message] 5 ("/usr/local/src/xemacs-21.2/bld-debug/lisp/package-ui.elc" . 13397) nil>() call-interactively(pui-list-packages) ------------------------ cut here ------------------------ Message log: ------------------------ cut here ------------------------ Loading package-ui... Loading package-ui...done Loading efs-dump... Loading efs-dump...done Loading efs... Loading efs...done Opening FTP connection to ftp.xemacs.org... Logging in as user anonymous... Logging in as user anonymous...done Getting pwd... Getting pwd...done CWD'ing to /anonymous＠ftp.xemacs.org:/pub/xemacs/packages/... CWD'ing to /anonymous＠ftp.xemacs.org:/pub/xemacs/packages/...done Listing /anonymous＠ftp.xemacs.org:/pub/xemacs/packages/... Quit Listing /anonymous＠ftp.xemacs.org:/pub/xemacs/packages/...done Opening input file: No such file or directory, /anonymous＠ftp.xemacs.org:/pub/xemacs/packages/package-index.LATEST.pgp ------------------------ cut here ------------------------ Ftp log: ------------------------ cut here ------------------------ open ftp.xemacs.org Connected to xemacs.org. 220 ProFTPD 1.2.0pre10 Server (ProFTPD on ftp.tux.org) [gwyn.tux.org] quote user "anonymous" ftp> 331 Anonymous login ok, send your complete e-mail address as password. ftp> quote pass Turtle Power! 230-+--------------------------------------------------------------------------+ | Welcome to ftp.tux.org! | +--------------------------------------------------------------------------+ | This server and its network connection have been graciously donated by | | Erol's Internet Services of Springfield, Virginia, USA (703) 321-8000. | | | | It is a 350 MHz AMD K6-2 with 128 MB of RAM and running Linux. | | It is administered by Linux user groups in the East Coast of the USA on | | behalf of their members and the Linux community worldwide. | | | | The goal of this FTP site is to provide timely mirrors of Linux-related | | software from all over the world. It is not a complete mirror of all of | | the large sites; instead it combines mirrors of the most important parts | | of the large FTP archives with direct nightly mirrors of many smaller, | | harder-to-find sites plus a growing amount of original content. | | | | If there is something Linux-related you would like to have added to the | | mirror or if you see a problem with something already mirrored here, | | please contact <ftp(a)tux.org&gt;. | +--------------------------------------------------------------------------+ 230 Anonymous access granted, restrictions apply. ftp> hash Hash mark printing on (1024 bytes/hash mark). ftp> quote pwd 257 "/" is current directory. ftp> quote syst 215 UNIX Type: L8 ftp> quote cwd /pub/xemacs/packages/ 250 CWD command successful. ftp> ls "-al" /tmp/efsaLCfWl 200 PORT command successful. 150 Opening ASCII mode data connection for file list. 226 Transfer complete. ftp> quote site idle 500 'SITE IDLE' not understood. ftp> ------------------------ cut here ------------------------ sperber(a)informatik.uni-tuebingen.de (Michael Sperber [Mr. Preprocessor]) wrote: -- Cheers, -Dima.