Mercurial > hg > xemacs-beta
comparison lisp/cus-dep.el @ 410:de805c49cfc1 r21-2-35
Import from CVS: tag r21-2-35
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:19:21 +0200 |
parents | 74fd4e045ea6 |
children | 697ef44129c6 |
comparison
equal
deleted
inserted
replaced
409:301b9ebbdf3b | 410:de805c49cfc1 |
---|---|
156 (t | 156 (t |
157 (princ (format "Generating %s...\n" cusload-base-file)) | 157 (princ (format "Generating %s...\n" cusload-base-file)) |
158 (with-temp-file cusload-file | 158 (with-temp-file cusload-file |
159 (insert ";;; " cusload-base-file | 159 (insert ";;; " cusload-base-file |
160 " --- automatically extracted custom dependencies\n" | 160 " --- automatically extracted custom dependencies\n" |
161 "\n;;; Code:\n\n") | 161 "\n;;; Code:\n\n" |
162 "(autoload 'custom-add-loads \"cus-load\")\n\n") | |
162 (mapatoms | 163 (mapatoms |
163 (lambda (sym) | 164 (lambda (sym) |
164 (let ((members (get sym 'custom-group)) | 165 (let ((members (get sym 'custom-group)) |
165 item where found) | 166 item where found) |
166 (when members | 167 (when members |