emacs.d/bundle/bundle--customfile.el
2021-05-04 22:26:55 +02:00

36 lines
1.5 KiB
EmacsLisp

;; OS SETTINGS
(when (eq system-type 'gnu/linux)
(setq custom-file "~/.emacs.d/bundle/custom_gnu.el"
org-directory "~/Documents/journal/"
org-agenda-files '("~/Documents/journal/")
org-default-notes-file "notes.org"
org-babel-python-command "python3"
browse-url-secondary-browser-function 'browse-url-firefox
python-shell-interpreter "ipython"
python-shell-interpreter-args "--simple-prompt -i")
(add-to-list 'Info-default-directory-list "~/Documents/info/"))
(when (eq system-type 'windows-nt)
(setq custom-file "~/.emacs.d/bundle/custom_win32.el")
(setq sbcl-exe (expand-file-name "C:\\Program Files\\Steel Bank Common Lisp\\2.0.0\\sbcl.exe")
sbcl-core (expand-file-name "C:\\Program Files\\Steel Bank Common Lisp\\2.0.0\\sbcl.core")
inferior-lisp-program "sbcl"
slime-lisp-implementations `((sbcl (,sbcl-exe "--core" ,sbcl-core))))
(defun powershell (&optional buffer)
"Launches a powershell in buffer *powershell* and switches to it."
(interactive)
(let ((buffer (or buffer "*powershell*"))
(powershell-prog "C:\\Program Files\\PowerShell\\7\\pwsh.exe"))
(make-comint-in-buffer "shell" "*powershell*" powershell-prog)
(switch-to-buffer buffer)))
(when (string= (system-name) "EVG02667NB")
(cd "d:/opt")
(setq custom-file "~/.emacs.d/bundle/custom_win32_EVG02667NB.el"))
(when (string= (system-name) "XPS-8930")))
;; CUSTOM_FILE
(load custom-file :noerror)