emacs.d/bundle/os.el

(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")
    (setq python-shell-interpreter "ipython")))

(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)