[COMMIT] Respect the platform path separator in edt

This fixes Timothy Zitzer’s problem of http://mid.gmane.org/OF65F438D1.31251AA9-ON88257333.006D73D0-88257333.006... . APPROVE COMMIT NOTE: This patch has been committed. xemacs-packages/edt/ChangeLog addition: 2007-08-14 Aidan Kehoe <kehoea(a)parhasard.net&gt; * edt.el (edt-load-keys): Respect the platform path separator when working out where to find edt-mapper.el. XEmacs Packages source patch: Diff command: cvs -q diff -Nu Files affected: xemacs-packages/edt/edt.el =================================================================== RCS Index: xemacs-packages/edt/edt.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/edt/edt.el,v retrieving revision 1.4 diff -u -u -r1.4 edt.el --- xemacs-packages/edt/edt.el 2003/03/22 08:12:55 1.4 +++ xemacs-packages/edt/edt.el 2007/08/14 21:44:38 ＠＠ -2073,7 +2073,10 ＠＠ (search-list (append (list (expand-file-name ".")) load-path))) (while (and (not found) search-list) (setq path (concat (car search-list) - (if (string-match "/$" (car search-list)) "" "/") + (if (string-match + (string directory-sep-char ?$) + (car search-list)) "" + (string directory-sep-char)) file)) (if (and (file-exists-p path) (not (file-directory-p path))) (setq found t)) -- On the quay of the little Black Sea port, where the rescued pair came once more into contact with civilization, Dobrinton was bitten by a dog which was assumed to be mad, though it may only have been indiscriminating. (Saki) _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches