Hi,
once efs is loaded modules cannot be loaded anymore because efs overwrites
`load' defined in code-files.el with `efs-load' which ignores modules. Here is
a fix.
Oscar Figueiredo
2005-02-16 Oscar Figueiredo <oscar(a)xemacs.org>
* efs.el (efs-load): Try to load file as a module if supported.
--- efs.el~ 2004-10-04 10:52:04.000000000 +0200
+++ efs.el 2005-02-16 11:31:15.000000000 +0100
@@ -8707,8 +8707,15 @@
file
(if nosuffix '("") efs-load-lisp-extensions))))
(if (not filename)
- (and (null noerror) (signal 'file-error
- (list "Cannot open load file %s" file)))
+ (if (and (> (length file) 0)
+ (locate-file file module-load-path
+ (and (not nosuffix) module-extensions)))
+ (if (featurep 'modules)
+ (let ((load-modules-quietly nomessage))
+ (declare-fboundp (load-module file)))
+ (signal 'file-error '("This XEmacs does not support modules")))
+ (and (null noerror) (signal 'file-error
+ (list "Cannot open load file %s" file))))
(let ((parsed (efs-ftp-path filename)))
(if parsed
(let* ((temp-directory (car (efs-make-tmp-name nil (car parsed))))
Show replies by date