mirror of
https://github.com/larstvei/dot-emacs.git
synced 2024-11-26 07:28:31 +00:00
Only add site-lisp directory if it exists.
This commit is contained in:
parent
5477b1f7bc
commit
98dbd3303a
3
init.el
3
init.el
@ -86,8 +86,9 @@ PACKAGE is installed and the current version is deleted."
|
|||||||
)
|
)
|
||||||
|
|
||||||
(let ((default-directory (concat user-emacs-directory "site-lisp/")))
|
(let ((default-directory (concat user-emacs-directory "site-lisp/")))
|
||||||
|
(when (file-exists-p default-directory)
|
||||||
(normal-top-level-add-to-load-path '("."))
|
(normal-top-level-add-to-load-path '("."))
|
||||||
(normal-top-level-add-subdirs-to-load-path))
|
(normal-top-level-add-subdirs-to-load-path)))
|
||||||
|
|
||||||
(fset 'yes-or-no-p 'y-or-n-p)
|
(fset 'yes-or-no-p 'y-or-n-p)
|
||||||
|
|
||||||
|
3
init.org
3
init.org
@ -167,8 +167,9 @@
|
|||||||
|
|
||||||
#+BEGIN_SRC emacs-lisp :tangle yes
|
#+BEGIN_SRC emacs-lisp :tangle yes
|
||||||
(let ((default-directory (concat user-emacs-directory "site-lisp/")))
|
(let ((default-directory (concat user-emacs-directory "site-lisp/")))
|
||||||
|
(when (file-exists-p default-directory)
|
||||||
(normal-top-level-add-to-load-path '("."))
|
(normal-top-level-add-to-load-path '("."))
|
||||||
(normal-top-level-add-subdirs-to-load-path))
|
(normal-top-level-add-subdirs-to-load-path)))
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
|
|
||||||
Answering /yes/ and /no/ to each question from Emacs can be tedious, a
|
Answering /yes/ and /no/ to each question from Emacs can be tedious, a
|
||||||
|
Loading…
Reference in New Issue
Block a user