36 lines
1.1 KiB
EmacsLisp
36 lines
1.1 KiB
EmacsLisp
(defun evo-load-paths ()
|
|
(unless (file-directory-p (expand-file-name "~/Documents"))
|
|
(defvar *docs-path* (getenv "DOCS_PATH"))))
|
|
|
|
(when (eq system-type 'darwin)
|
|
(when (display-graphic-p)
|
|
(add-to-list 'default-frame-alist '(ns-transparent-titlebar . t))
|
|
(add-to-list 'default-frame-alist '(ns-appearance . dark))))
|
|
|
|
(when (eq system-type 'windows-nt)
|
|
(setq python-shell-interpreter "python")
|
|
(add-to-list 'load-path (expand-file-name "~/AppData/Roaming/__secrets"))
|
|
(cd "~/opt")
|
|
(when (string= (system-name) "EVG02667NB")
|
|
(evo-load-paths))
|
|
(when (string= (system-name) "XPS-8930")))
|
|
|
|
(when (eq system-type 'gnu/linux)
|
|
(setq x-select-enable-clipboard t
|
|
x-select-request-type '(UTF8_STRING COMPOUND_TEXT TEXT STRING)
|
|
x-select-enable-primary t
|
|
undo-tree-enable-undo-in-region nil
|
|
slime-lisp-implementations '((sbcl ("/usr/bin/sbcl")))
|
|
gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3"
|
|
elpy-rpc-python-command "python3")
|
|
(when (string= (system-name) "XPS-13-9380")))
|
|
|
|
|
|
(provide 'os)
|
|
|
|
;; Local Variables:
|
|
;; mode: emacs-lisp
|
|
;; coding: utf-8
|
|
;; fill-column: 79
|
|
;; lisp-indent-offset: 2
|
|
;; End:
|