Mercurial > hg > xemacs-beta
comparison lisp/prim/cus-load.el @ 167:85ec50267440 r20-3b10
Import from CVS: tag r20-3b10
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:45:46 +0200 |
parents | 0132846995bd |
children | 15872534500d |
comparison
equal
deleted
inserted
replaced
166:7a77eb660975 | 167:85ec50267440 |
---|---|
31 ;;; Code: | 31 ;;; Code: |
32 | 32 |
33 (let ((dir load-path)) | 33 (let ((dir load-path)) |
34 (while dir | 34 (while dir |
35 (condition-case nil | 35 (condition-case nil |
36 (load (concat (car dir) "/cus-load")) | 36 (load (concat (car dir) "/custom-load") nil t) |
37 (file-error nil)) | 37 (file-error nil)) |
38 (pop dir))) | 38 (pop dir))) |
39 | 39 |
40 (provide 'cus-load) | 40 (provide 'cus-load) |
41 | 41 |