64 lines
2.2 KiB
EmacsLisp
64 lines
2.2 KiB
EmacsLisp
(use-package doom-themes
|
|
:init
|
|
(setq doom-themes-enable-bold t ; if nil, bold is universally disabled
|
|
doom-themes-enable-italic t) ; if nil, italics is universally disabled
|
|
(load-theme 'doom-one t))
|
|
|
|
(defvar mk/hyperspec-dir-locations
|
|
'("d:/visua/projects/personal/lisp-docs/HyperSpec-7-0/HyperSpec/"
|
|
"~/projects/personal/lisp-docs/HyperSpec-7-0/HyperSpec/"
|
|
"~/lisp-docs/HyperSpec-7-0/HyperSpec/"
|
|
"~/sites/HyperSpec/"))
|
|
|
|
(defun mk/find-dir (x)
|
|
(cond ((null x) nil)
|
|
((file-directory-p (car x)) (car x))
|
|
(t (mk/find-dir (cdr x)))))
|
|
|
|
(defun mk/hyperspec-dir ()
|
|
(let ((dir-prefix
|
|
(if (eq system-type 'windows-nt)
|
|
"file:///"
|
|
"file://"))
|
|
(dir (mk/find-dir mk/hyperspec-dir-locations)))
|
|
(if dir
|
|
(concat dir-prefix
|
|
(expand-file-name dir))
|
|
nil)))
|
|
|
|
(setq common-lisp-hyperspec-root (mk/hyperspec-dir))
|
|
|
|
;; OS SETTINGS
|
|
(when (eq system-type 'gnu/linux)
|
|
(setq custom-file "~/.emacs.d/bundle/custom_gnu.el"
|
|
browse-url-secondary-browser-function 'browse-url-firefox)
|
|
;; (setq ispell-hunspell-dict-paths-alist
|
|
;; '(("de_DE_frami" "~/Library/Spelling/de_DE_frami.aff")
|
|
;; ("en_US" "/usr/share/hunspell/en_US.aff")))
|
|
)
|
|
|
|
(when (eq system-type 'windows-nt)
|
|
;; (add-to-list 'exec-path "C:/msys64/mingw64/bin")
|
|
;; (add-to-list 'exec-path "C:/msys64/usr/bin")
|
|
;; (setenv "PATH" (concat "C:\\msys64\\mingw64\\bin;" (getenv "PATH")))
|
|
;; (when (directory-name-p "c:/msys64/")
|
|
;; (setq ispell-program-name "c:/msys64/mingw64/bin/hunspell.exe"
|
|
;; mpv-executable "c:/msys64/mingw64/bin/mpv.exe"))
|
|
|
|
(setq custom-file "~/.emacs.d/bundle/custom_win32.el")
|
|
(setq org-babel-python-command "python")
|
|
|
|
;; (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")))
|
|
|
|
;; CUSTOM_FILE
|
|
(load custom-file :noerror)
|