Mercurial > hg > xemacs-beta
diff lisp/utils/finder.el @ 50:ee648375d8d6 r19-16b91
Import from CVS: tag r19-16b91
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:56:41 +0200 |
parents | 0293115a14e9 |
children | 131b0175ea99 |
line wrap: on
line diff
--- a/lisp/utils/finder.el Mon Aug 13 08:56:06 2007 +0200 +++ b/lisp/utils/finder.el Mon Aug 13 08:56:41 2007 +0200 @@ -198,7 +198,9 @@ (directory-files d nil "^[^=].*\\.el$"))))) dirs) (insert "))\n\n(provide 'finder-inf)\n\n;;; finder-inf.el ends here\n") - (kill-buffer "*finder-scratch*") + (condition-case nil + (kill-buffer "*finder-scratch*") + (t nil)) (eval-current-buffer) ;; So we get the new keyword list immediately (basic-save-buffer))))