Massaging load-history

I am using Didier Verna's rcfiles package (thanks Didier!). But I found that I couldn't get it to work with some packages such as lisp-mode. The rcfiles package uses `eval-after-load' which looks up the mode in `load-history' to see if it has already been loaded. If so, it runs the form for you. But, unfortunately, files such as lisp-mode have the full path rather than a simple load name. This path is useless on any machine except the build machine. So I wrote some simple code to massage the load-history so it would work. (setq load-history (mapcar (lambda (elt) (let ((a (car elt))) (if (eq 0 (string-match "/.*/\\([^/]+\\)\.elc" a)) (list (match-string 1 a) (cdr elt)) elt))) load-history)) Feel free to make fun of the code.... or make suggestions.... but my real question is: will this cause problems? Anybody know of code that needs the full path? Cheers, Sean _______________________________________________ XEmacs-Beta mailing list XEmacs-Beta(a)xemacs.org http://lists.xemacs.org/mailman/listinfo/xemacs-beta