Seiji Zenitani
zenit****@users*****
2006年 6月 6日 (火) 01:39:09 JST
Index: CarbonEmacsPackage/GPL/EmacsCVS-src-20060517.tbz Index: CarbonEmacsPackage/GPL/EmacsCVS-src-20060605.tbz Index: CarbonEmacsPackage/GPL/site-start.el diff -u CarbonEmacsPackage/GPL/site-start.el:1.15 CarbonEmacsPackage/GPL/site-start.el:1.16 --- CarbonEmacsPackage/GPL/site-start.el:1.15 Sat May 13 17:00:41 2006 +++ CarbonEmacsPackage/GPL/site-start.el Tue Jun 6 01:39:09 2006 @@ -68,9 +68,11 @@ ;; load site-start.d/*.el -(mapc 'load (directory-files - (concat carbon-emacs-package-prefix "/site-lisp/site-start.d") - t "\\.el\\'")) +(let ((start-dir + (concat carbon-emacs-package-prefix "/site-lisp/site-start.d"))) + (if (file-exists-p start-dir) + (mapc 'load (directory-files start-dir t "\\.el\\'")) + )) ;;; end
