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

Move sbcl settings and update customfile

Browse source
This commit is contained in:
Marcus Kammer 2020-07-26 20:14:05 +02:00
parent 4f915c7dfb
commit 0d5ba2300e
3 changed files with 9 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
bundle/bundle--customfile.el
View file

@ -6,6 +6,10 @@
(setq custom-file "~/.emacs.d/bundle/custom_win32.el") (setq custom-file "~/.emacs.d/bundle/custom_win32.el")
(add-to-list 'load-path (expand-file-name "~/AppData/Roaming/__secrets")) (add-to-list 'load-path (expand-file-name "~/AppData/Roaming/__secrets"))
(cd "~/opt") (cd "~/opt")
(setq sbcl-exe (expand-file-name "~/AppData/Local/Programs/Steel Bank Common Lisp/1.4.14/sbcl.exe")
sbcl-core (expand-file-name "~/AppData/Local/Programs/Steel Bank Common Lisp/1.4.14/sbcl.core")
inferior-lisp-program "sbcl"
slime-lisp-implementations `((sbcl (,sbcl-exe "--core" ,sbcl-core))))
(when (string= (system-name) "EVG02667NB") (when (string= (system-name) "EVG02667NB")
(add-to-list 'Info-default-directory-list "~/Info") (add-to-list 'Info-default-directory-list "~/Info")
(setq custom-file "~/.emacs.d/bundle/custom_win32_EVG02667NB.el")) (setq custom-file "~/.emacs.d/bundle/custom_win32_EVG02667NB.el"))

5
bundle/custom_win32.el
View file

@ -9,6 +9,11 @@
'(custom-safe-themes '(custom-safe-themes
(quote (quote
("37768a79b479684b0756dec7c0fc7652082910c37d8863c35b702db3f16000f8" "7f6d4aebcc44c264a64e714c3d9d1e903284305fd7e319e7cb73345a9994f5ef" default))) ("37768a79b479684b0756dec7c0fc7652082910c37d8863c35b702db3f16000f8" "7f6d4aebcc44c264a64e714c3d9d1e903284305fd7e319e7cb73345a9994f5ef" default)))
'(default-frame-alist
(quote
((font . "Fira Code-11")
(vertical-scroll-bars)
(fullscreen . maximized))))
'(inhibit-startup-buffer-menu t) '(inhibit-startup-buffer-menu t)
'(initial-buffer-choice "~/Documents/Journal/notes.org") '(initial-buffer-choice "~/Documents/Journal/notes.org")
'(menu-bar-mode nil) '(menu-bar-mode nil)

12
init.el
View file

@ -28,16 +28,4 @@
(put 'narrow-to-region 'disabled nil) (put 'narrow-to-region 'disabled nil)
(put 'narrow-to-page 'disabled nil) (put 'narrow-to-page 'disabled nil)
;; SBCL
(defun win-set-sbcl ()
;; %USERPROFILE%\AppData\Local\Programs\emacs-26.2-x86_64\bin\emacsclientw.exe -c -n -a runemacs.exe
;; (setq inferior-lisp-program (executable-find "sbcl"))
(setq sbcl-exe (expand-file-name "~/AppData/Local/Programs/Steel Bank Common Lisp/1.4.14/sbcl.exe")
sbcl-core (expand-file-name "~/AppData/Local/Programs/Steel Bank Common Lisp/1.4.14/sbcl.core")
inferior-lisp-program "sbcl"
slime-lisp-implementations `((sbcl (,sbcl-exe "--core" ,sbcl-core)))))
(when (eq system-type 'windows-nt)
(win-set-sbcl))
(load "bundle--mk") (load "bundle--mk")