Gruss bug team:
Please honor value of `directory-sep-char' instead of using hard-coded
"/" throughout the EFS package.
I suspect this makes EFS fail on Windows NT.
Currently I am running a patched version of xemacs-21.0-b46 which
normalizes path names to use Unix syntax so that is works with
EFS. Consequently I was not able to verify my assessment of the
problem. Please let me know if I can be of further help/nuisance.
Schöne Grüße,
Adrian
cd /export/home/tmp/packages-21.0/lisp/efs/
egrep -ni '"/"' *.el /dev/null
Compilation started at Wed Jun 24 23:03:52 1998
efs-auto.el:38: "/"
efs-cms-knet.el:25: "/"
efs-cms-knet.el:65: (concat "/" path "/")
efs-cms-knet.el:79: ((string-equal "/" dir-path)
efs-cms-knet.el:107: (if (string-equal dir "/")
efs-cms-knet.el:132: (efs-put-hash-entry (concat path md "/") md-tbl
efs-cms-knet.el:154: (string-equal "/" dir))
efs-cms-knet.el:234: (if (string-equal rdir "/")
efs-cms-knet.el:236: (match-end 3)) "/" name)))
efs-cms.el:24: "/"
efs-cms.el:87: (return (concat "/" (substring path 0 start))))
efs-cms.el:89: (setq return (concat return "/"
efs-cms.el:93: (concat return "/" (substring path start)))
efs-cms.el:100: (concat "/" path)))
efs-cms.el:137: ((string-equal "/" dir-path)
efs-cms.el:285: (or (string-equal "/" dir)
efs-coke.el:24: "/"
efs-coke.el:37: "/")
efs-coke.el:42: (if reverse (concat "/" path) path)))
efs-coke.el:46: (if (or (string-equal dir-path "/") (string-equal dir-path
"/."))
efs-coke.el:80: (and (string-equal "/" dir) (string-equal "."
file)))
efs-cp-p.el:26: "/"
efs-cu.el:57: "/"
efs-cu.el:590: (let* ((key (concat (downcase host) "/" user))
efs-cu.el:598: (let* ((key (concat (downcase host) "/" user))
efs-defun.el:138: "/"
<lines deleted by Adrian>
Emacs : XEmacs 21.0 "Toggenburg" [Lucid] (sparc-sun-solaris2.5.1, Mule) of Mon
Jun 22 1998 on tomorrow
Package: efs
efs believes that the host type of any is unknown.
current state:
==============
(setq
efs-auto-version "1.16/1.8"
efs-cp-p-version "1.16/1.1"
efs-cu-version "1.16/1.12"
efs-defun-version "1.16/1.1"
efs-dired-mule-version "1.16/1.1"
efs-dired-version "1.16/1.32"
efs-dump-version "1.16/1.2"
efs-fnh-version "1.16/1.3"
efs-netrc-version "1.16/1.2"
efs-ovwrt-version "1.16/1.2"
efs-report-version "1.16/1.9"
efs-version "1.16/1.56"
efs-x19.15-version "1.16/1.2"
efs-36-bit-binary-file-name-regexp nil
efs-anonymous-umask nil
efs-auto-save t
efs-auto-save-remotely nil
efs-backup-by-copying nil
efs-binary-file-host-regexp nil
efs-binary-file-name-regexp
"\\.\\([zZ]\\|t?gz\\|lzh\\|arc\\|zip\\|zoo\\|ta[rz]\\|dvi\\|sit\\|ps\\|elc\\|gif\\|Z-part-..\\|tpz\\|exe\\|[jm]pg\\|TZ[a-z]?\\|lib\\)\\(~\\|~[0-9]+~\\)?$\\|\\.\\(ARC\\|ELC\\|TAGS\\|EXE\\|ZIP\\|DVI|ZOO\\|GIF\\|T?GZ\\|[JM]PG\\)\\([.#;][0-9]+\\)?$"
efs-buffer-name-case nil
efs-compute-remote-buffer-file-truename nil
efs-debug-ftp-connection nil
efs-ding-on-chmod-failure t
efs-ding-on-umask-failure t
efs-disable-netrc-security-check nil
efs-expire-ftp-buffers t
efs-ftp-buffer-expire-time nil
efs-ftp-program-args '("-i" "-n" "-g" "-v")
efs-ftp-prompt-regexp "^\\(ftp\\|Ftp\\|FTP\\)> *"
efs-gateway-ftp-prompt-regexp "^\\(ftp\\|Ftp\\|FTP\\)> *"
efs-gateway-hash-mark-size nil
efs-gateway-incoming-binary-hm-size nil
efs-generate-anonymous-password t
efs-hash-mark-size 1024
efs-high-security-hosts nil
efs-incoming-binary-hm-size nil
efs-local-apollo-unix nil
efs-ls-cache-max 5
efs-make-backup-files '(unix sysV-unix bsd-unix next-unix apollo-unix
dumb-unix dumb-apollo-unix super-dumb-unix)
efs-max-ftp-buffer-size 3000
efs-maximize-idle nil
efs-message-interval 0
efs-nlist-cmd "ls"
efs-nslookup-on-connect nil
efs-nslookup-program "nslookup"
efs-prompt-for-transfer-type nil
efs-pty-check-retry-time 5
efs-pty-check-threshold 1000
efs-retry-time 5
efs-root-umask nil
efs-send-hash t
efs-set-modtimes-synchronously nil
efs-short-circuit nil
efs-short-circuit-to-remote-root nil
efs-suppress-abort-recursive-edit-and-then nil
efs-text-file-name-regexp ".*"
efs-treat-crlf-as-nl nil
efs-umask nil
efs-use-passive-mode nil
efs-verbose t
efs-verify-anonymous-modtime nil
efs-verify-modtime-host-regexp ".*"
efs-ftp-program-name "ftp"
efs-ftp-program-args '("-i" "-n" "-g" "-v")
efs-local-host-regexp ".*"
efs-ftp-local-host-regexp ".*"
efs-gateway-host nil
efs-gateway-type nil
reporter-version "3.35"
features '(reporter efs-report package-get package-admin config
package-get-base efs-cp-p find-func bbdb-xemacs cus-edit cus-load
wid-edit hyper-apropos info view-less view ediff-merg ediff-diff
ediff-tbar ediff-wind ediff-help ediff-util ediff-mult ediff-init
ediff timer cc-mode cc-cmds cc-styles cc-align cc-langs cc-engine
cc-vars cc-defs cc-menus compile rcompile efs-dired efs-netrc
efs-defun efs bookmark pp lazy-shot gnus-msg passwd rlogin shell
smiley annotations sort mail-extr mel-q highlight-headers
gnus-async gnus-score score-mode gnus-dup gnus-art-mime tm-bbdb
bbdb-hooks bbdb-com gnus-art browse-url mailcrypt comint ring
gnus-sum-mime gnus-sum nndraft nnmh gnus-cache nnml nnfolder
gnus-group gnus-undo gnus-demon nnmail nntp nnoo gnus-setup
gnus-start gnus-range gnus-spec gnus-int gnus-win env gnuserv font
disp-table pending-del paren blink-paren balloon-help time
ps-print time-stamp redo mime-setup message-mime tm-edit signature
tm-ew-e tm-partial tm-image images mule-sysdp tm-pgp tm-play
tm-view tm-text tm-parse tm-ew-d tm-def std11 mel tm-setup
gnus-mime gnus-charset tl-misc tl-str tl-atype atype tl-seq
tl-list cless file-detect path-util emu emu-x20 emu-20 emu-xemacs
overlay sh-script skeleton executable bbdb-w3 bbdb-sc bbdb-gnus
gnus gnus-ems gnus-xmas gnus-util message messagexmas mail-abbrevs
sendmail nnheader nnheaderxm mail-utils mailheader bbdb-vm
vm-autoload vm-version vm vm-vars vm-startup bbdb t timezone
supercite regi jka-compr alist rsz-minibuf func-menu font-lock
crypt crypt++ completer efs-cu efs-x19\.15 efs-fnh efs-ovwrt
efs-auto cus-face dired-faces dired-xemacs dired
xemacs-devel-autoloads xemacs-base-autoloads w3-autoloads
vm-autoloads viper-autoloads view-process-autoloads vhdl-autoloads
vc-cc-autoloads vc-autoloads tpu-autoloads tooltalk-autoloads
tm-autoloads time-autoloads textools-autoloads
text-modes-autoloads texinfo-autoloads supercite-autoloads
strokes-autoloads speedbar-autoloads slider-autoloads
skk-autoloads sh-script-autoloads sgml-autoloads scheme-autoloads
rmail-autoloads reftex-autoloads psgml-autoloads
prog-modes-autoloads ph-autoloads pcl-cvs-autoloads pc-autoloads
os-utils-autoloads net-utils-autoloads mule-base-autoloads
misc-games-autoloads mine-autoloads mh-e-autoloads
mailcrypt-autoloads mail-lib-autoloads leim-autoloads
jde-autoloads ispell-autoloads ilisp-autoloads igrep-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
emerge-autoloads egg-its-autoloads efs-autoloads edt-autoloads
edit-utils-autoloads ediff-autoloads edict-autoloads
edebug-autoloads dired-autoloads debug-autoloads crisp-autoloads
cookie-autoloads cc-mode-autoloads calendar-autoloads
calc-autoloads c-support-autoloads bbdb-autoloads auctex-autoloads
apel-autoloads ada-autoloads Sun-autoloads Standard-autoloads
vm-loaddefs vc-hooks skk-leim egg-sj3-leim efs-dump ediff-hook
loadhist auto-show fontl-hooks x-iso8859-1 menubar-items x-menubar
dragdrop mouse mode-motion ccl mule-help itimer auto-save
lisp-mode easymenu iso8859-1 page buff-menu lib-complete derived
frame text-props cus-start custom widget cl-extra mini-cl cl cl-19
packages backquote tooltalk file-coding mule lucid-scrollbars
cut-buffer lucid-menubars xface motif-dialogs x tty-frames tty
toolbar native-sound scrollbar unix-processes multicast
network-streams subprocesses menubar dbm md5 xemacs xim tiff png
jpeg xpm cde lisp-float-type usg-unix-v dragdrop-api dialog
devices window-system c-balloon-help)
)
--
Adrian Aichner
Applications Engineer
Teradyne GmbH
Semiconductor Test Group Telephone +49/89/41861(0)-208
Dingolfinger Strasse 2 Fax +49/89/41861-217
D-81673 MUENCHEN E-mail aichner(a)ecf.teradyne.com