Mercurial > hg > xemacs-beta

comparison lisp/cus-dep.el @ 337:fbbf69b4e8a7 r21-0-66

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0-66
author cvs
date Mon, 13 Aug 2007 10:51:02 +0200
parents 03446687b7cc
children cc15677e0335
comparison
equal deleted inserted replaced
336:fe0a93612022 337:fbbf69b4e8a7
171 (unless (or (null where) 171 (unless (or (null where)
172 (member where found)) 172 (member where found))
173 (if found 173 (if found
174 (insert " ") 174 (insert " ")
175 (insert "(custom-add-loads '" 175 (insert "(custom-add-loads '"
176 (symbol-name sym) " '(")) 176 (prin1-to-string sym) " '("))
177 (prin1 where (current-buffer)) 177 (prin1 where (current-buffer))
178 (push where found))) 178 (push where found)))
179 (when found 179 (when found
180 (insert "))\n")))))) 180 (insert "))\n"))))))
181 (insert "\n;;; custom-load.el ends here\n")) 181 (insert "\n;;; custom-load.el ends here\n"))