[Sorry for the late reply!]
Vin Shelton <acs(a)xemacs.org> writes:
Your original advice was to modify the root-finding code, and I have
done that; with my modification installed, the parent of the
xemacs-packages directory is correctly found as a root and a data
root, but the xemacs-packages directory does not get searched and
added to load-path.
I'll do this, along with a few other patches cleaning up this code.
Two questions:
Index: lisp/setup-paths.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/setup-paths.el,v
retrieving revision 1.21
diff -a -u -r1.21 setup-paths.el
--- lisp/setup-paths.el 2004/12/27 12:25:15 1.21
+++ lisp/setup-paths.el 2005/12/28 16:54:05
@@ -102,12 +102,18 @@
;; in-place or windows-nt
(and
(paths-file-readable-directory-p (paths-construct-path (list directory
"lisp")))
- (paths-file-readable-directory-p (paths-construct-path (list directory
"etc"))))))
+ (paths-file-readable-directory-p (paths-construct-path (list directory
"etc"))))
I'm worried about code accretion in `paths-emacs-root-p' and
`emacs-data-root-p'---could you send me a directory tree listing of
the Windows XEmacs, and possibly give me an idea what environment
variables/registry settings/configure-xxx variables are set on
Windows?
-(defun paths-find-emacs-root (invocation-directory invocation-name)
- "Find the run-time root of XEmacs.
+ ;; searching for a package directory
+ (and
+ (string-match "win32\\|cygwin" system-configuration)
+ (paths-file-readable-directory-p (paths-construct-path (list directory
"xemacs-packages"))))))
I'm wondering---shouldn't this be `(eq system-type 'windows-nt)'. I
don't even know if that would include Cygwin. But shouldn't Cygwin be
more like Unix than like Windows native?
--
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla