1 ;; (setq inferior-lisp-program "/opt/homebrew/bin/sbcl")
2 ;; (load (expand-file-name "~/.local/opt/quicklisp/slime-helper.el"))
3 ;; (slime-setup '(slime-fancy slime-company))
4
5 (setq mouse-wheel-scroll-amount '(1 ((shift) . 1) ((control) . nil)))
6 (setq mouse-wheel-progressive-speed nil)
7
8 (setq visible-bell 1)
9
10 (defvar bootstrap-version)
11 (let ((bootstrap-file
12 (expand-file-name "straight/repos/straight.el/bootstrap.el" user-emacs-directory))
13 (bootstrap-version 5))
14 (unless (file-exists-p bootstrap-file)
15 (with-current-buffer
16 (url-retrieve-synchronously
17 "https://raw.githubusercontent.com/raxod502/straight.el/develop/install.el"
18 'silent 'inhibit-cookies)
19 (goto-char (point-max))
20 (eval-print-last-sexp)))
21 (load bootstrap-file nil 'nomessage))
22
23 ;; packages to install and load
24 (straight-use-package 'auto-complete)
25 (straight-use-package '(nano-theme :type git :host github
26 :repo "rougier/nano-theme"))
27 (straight-use-package 'use-package)
28 (straight-use-package 'org)
29 (straight-use-package
30 '(slime-company :type git :host github :repo "anwyn/slime-company"))
31 (straight-use-package 'sublimity)
32 (straight-use-package 'dashboard)
33 (straight-use-package 'all-the-icons)
34 (straight-use-package 'neotree)
35 (straight-use-package 'rust-mode)
36 (straight-use-package 'powerline)
37 (straight-use-package 'markdown-mode)
38 (straight-use-package 'moe-theme)
39 (straight-use-package 'ample-theme)
40 (straight-use-package 'slime)
41 (straight-use-package 'ac-slime)
42 ;; Not enabled/required by default
43 (straight-use-package 'evil)
44
45 ;; always enable ido mode
46 (require 'ido)
47 (ido-mode t)
48
49
50 (require 'evil)
51 ;; Required, but not enabled by defaul
52 (evil-mode 1)
53
54 ;; Enable tab behavior like vi
55 (straight-use-package '(evil-tabs :type git :host github
56 :repo "krisajenkins/evil-tabs"))
57 (require 'evil-tabs)
58 (global-evil-tabs-mode t)
59
60
61 (require 'markdown-mode)
62
63 (require 'powerline)
64 (powerline-default-theme)
65
66 (require 'neotree)
67 (global-set-key [f8] 'neotree-toggle)
68
69 (require 'dashboard)
70 (dashboard-setup-startup-hook)
71
72 (require 'auto-complete)
73 (global-auto-complete-mode t)
74
75 (require 'all-the-icons)
76
77 (require 'sublimity-scroll)
78 (require 'sublimity-map) ;; experimental
79 (require 'sublimity-attractive)
80 (setq sublimity-scroll-weight 10
81 sublimity-scroll-drift-length 5)
82 (setq sublimity-map-size 20)
83 (setq sublimity-map-fraction 0.3)
84 (setq sublimity-map-text-scale -7)
85 (sublimity-map-set-delay 1)
86 (setq sublimity-attractive-centering-width nil)
87
88 (add-to-list 'default-frame-alist '(font . "Lucida Console" ))
89 (set-face-attribute 'default t :font "Lucida Console" )
90
91 (setq backup-directory-alist
92 `((".*" . ,temporary-file-directory)))
93 (setq auto-save-file-name-transforms
94 `((".*" ,temporary-file-directory t)))
95
96 (load-theme 'nano t)