marcuskammer/emacs.d
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Update windows settings

Browse source
This commit is contained in:
Marcus Kammer 2019-09-21 13:54:13 +02:00
parent e0b942452b
commit 757f4039e4
1 changed files with 9 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
init.el
View file

@ -64,7 +64,7 @@ There are two things you can do about this warning:
'(default-frame-alist
(quote
((fullscreen . maximized)
(width . 86)
(width . 90)
(height . 46)
(font . "Iosevka Term-13.0")
(vertical-scroll-bars)
@ -203,12 +203,17 @@ There are two things you can do about this warning:
(when (eq system-type 'windows-nt)
;; %USERPROFILE%\AppData\Local\Programs\emacs-26.2-x86_64\bin\emacsclientw.exe -c -n -a runemacs.exe
(cd "~/opt")
(add-to-list 'load-path (expand-file-name "~/.emacs.d/__evo"))
(setq python-shell-interpreter "python")
(setq slime-lisp-implementations '((sbcl ("C:\\Program Files\\Steel Bank Common Lisp\\1.4.14\\sbcl.exe" "--core" "C:\\Program Files\\Steel Bank Common Lisp\\1.4.14\\sbcl.core"))))
;;(setq inferior-lisp-program (executable-find "sbcl"))
(setq inferior-lisp-program "sbcl")
(when (display-graphic-p)
(add-to-list 'default-frame-alist '(fullscreen . nil))
(add-to-list 'default-frame-alist '(undecorated . nil))
(add-to-list 'default-frame-alist '(font . "Iosevka Term-11"))
(when (string= (system-name) "EVG01788WS")
(add-to-list 'default-frame-alist '(undecorated . nil))
(add-to-list 'default-frame-alist '(font . "Iosevka Term-11")))))
(add-to-list 'load-path (expand-file-name "~/.emacs.d/__evo")))
(when (string= (system-name) "XPS-8930"))))
(when (eq system-type 'gnu/linux)
(setq gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3")