emacs.d/bundle/os.el

(defun evo-load-paths ()
  (add-to-list 'load-path (expand-file-name "~/.emacs.d/__evo"))
  (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 slime-lisp-implementations '((sbcl ("/usr/bin/sbcl"))))
  (setq gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3")
  (when (string= (system-name) "XPS-13-9380")))

(provide 'os)