commit c012d25658ea40f6a6efe1acbb21a6d9349d41c1
parent 8e0e15eff5bbff8a777c5173c1b22da0ea42fca1
Author: Ryan Jeffrey <pwishie@gmail.com>
Date: Sat, 21 Dec 2019 19:11:17 -0800
new econfig
Diffstat:
| M | speconf.org | | | 137 | ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++------------------- |
1 file changed, 104 insertions(+), 33 deletions(-)
diff --git a/speconf.org b/speconf.org
@@ -21,13 +21,13 @@
(add-to-list 'load-path "~/.emacs.d/themes/")
- (load-theme 'dracula t)
+ (load-theme 'molokai t)
(global-set-key (kbd "S-<right>") 'next-buffer)
(global-set-key (kbd "S-<left>") 'previous-buffer)
- (set-frame-parameter (selected-frame) 'alpha '(80 . 50))
- (add-to-list 'default-frame-alist '(alpha . (80 . 50)))
+ (set-frame-parameter (selected-frame) 'alpha '(100 . 95))
+ (add-to-list 'default-frame-alist '(alpha . (100 . 95)))
#+END_SRC
** Ivy-mode
@@ -69,6 +69,15 @@
(blink-cursor-mode 0)
(set-language-environment "UTF-8")
(setq redisplay-dont-pause t)
+
+
+(require 'neotree)
+(global-set-key [f8] 'neotree-toggle)
+(global-set-key (kbd "s-i") 'ido-switch-buffer)
+
+(global-set-key (kbd "s-+") 'text-scale-increase)
+(global-set-key (kbd "s--") 'text-scale-decrease)
+
#+END_SRC
** Filename-mode associations
@@ -108,10 +117,7 @@
:load-path
"~/.emacs.d/joestar/"
:config
- (joestar-mode t))
-(dolist (hook '(prog-mode-hook text-mode-hook help-mode-hook dired-mode-hook
- conf-mode))
- (add-hook hook #'joestar-mode))
+ (global-joestar-mode t))
#+END_SRC
** org
@@ -149,6 +155,53 @@
(add-to-list 'company-backends 'company-c-headers)
+ (require 'color)
+
+(let ((bg (face-attribute 'default :background)))
+(custom-set-faces
+ `(company-tooltip ((t (:inherit default :background ,(color-lighten-name bg 2)))))
+ `(company-scrollbar-bg ((t (:background ,(color-lighten-name bg 10)))))
+ `(company-scrollbar-fg ((t (:background ,(color-lighten-name bg 5)))))
+ `(company-tooltip-selection ((t (:inherit font-lock-function-name-face))))
+ `(company-tooltip-common ((t (:inherit font-lock-constant-face))))))
+
+;(use-package company-quickhelp
+; :ensure t
+; :config
+; (company-quickhelp-mode)
+;
+; :hook
+; (company-mode))
+
+#+END_SRC
+** C#
+#+BEGIN_SRC emacs-lisp
+
+(use-package omnisharp
+ :ensure t
+ :config
+
+ (omnisharp-start-omnisharp-server)
+ (omnisharp-mode)
+ (eval-after-load
+ 'company
+ '(add-to-list 'company-backends 'company-omnisharp))
+
+ :hook (csharp-mode))
+
+ ;; (require 'omnisharp)
+
+
+ ;; (defun omnisharp-init ()
+ ;; (omnisharp-start-omnisharp-server)
+ ;; (omnisharp-mode)
+ ;; (eval-after-load
+ ;; 'company
+ ;; '(add-to-list 'company-backends 'company-omnisharp))
+
+ ;; (add-hook 'csharp-mode-hook #'company-mode))
+
+ ;; (add-hook 'csharp-mode-hook #'omnisharp-init)
#+END_SRC
** all programming languages
@@ -208,7 +261,7 @@
#+BEGIN_SRC emacs-lisp
(use-package slime
-:init
+ :init
(setq inferior-lisp-program "/opt/sbcl/bin/sbcl")
(setq slime-contribs '(slime-fancy))
(load (expand-file-name "~/quicklisp/slime-helper.el"))
@@ -217,14 +270,29 @@
(setq geiser-active-implementations '(guile))
+(use-package miracle
+ ;:ensure t
+ :load-path "~/.emacs.d/miracle"
+
+ :config
+ (clojure-enable-miracle)
+ (define-key clojure-mode-map (kbd "C-c C-k") 'miracle-eval-buffer)
+ (define-key clojure-mode-map (kbd "C-c C-e") 'miracle-eval-expression-at-point)
+ (define-key clojure-mode-map (kbd "C-c C-n") 'miracle-eval-namespace)
+ (define-key clojure-mode-map (kbd "C-c C-d") 'miracle-job)
+ (define-key clojure-mode-map (kbd "C-c C-g") 'miracle-eval-defun)
+
+
+ :hook clojure-mode)
+
#+END_SRC
** Misc
-
#+BEGIN_SRC emacs-lisp
- (require 'neotree) ;;
- (global-set-key [f8] 'neotree-toggle)
+(add-to-list 'load-path "~/.emacs.d/i3wm-Config-Mode/")
+(require 'i3wm-config-mode)
+(add-to-list 'auto-mode-alist '("~/.config/i3/config" . i3wm-config-mode))
;; (custom-set-faces
;; ;; ...
;; '(company-preview ((t (:background "black" :foreground "red"))))
@@ -398,12 +466,15 @@
** spellcheck
#+BEGIN_SRC emacs-lisp
+
(setq ispell-program-name "hunspell")
(setq ispell-local-dictionary "en_US")
(setq ispell-local-dictionary-alist
'(("en_US" "[[:alpha:]]" "[^[:alpha:]]" "[']" nil nil nil utf-8)))
+
+
- #+END_SRC
+#+END_SRC
** line numbers
#+BEGIN_SRC emacs-lisp
@@ -441,7 +512,8 @@
`((,(concatenate 'string "\\(^\\|[^a-zA-Z0-9]\\)\\(" word "\\)[^a-zA-Z]")
(0 (progn (compose-region (match-beginning 2) (match-end 2)
,greek-char)
- nil))))))))) (add-hook 'lisp-mode-hook 'pretty-greek)
+ nil)))))))))
+(add-hook 'lisp-mode-hook 'pretty-greek)
(add-hook 'emacs-lisp-mode-hook 'pretty-greek)
(defun my/create-basic-ligatures ()
@@ -488,25 +560,12 @@
** highlighting
#+BEGIN_SRC emacs-lisp
- ;; (defface font-lock-control-face
- ;; '((t :foreground "#FF0000"))
- ;; "Font Lock mode face used for function calls."
- ;; :group 'font-lock-highlighting-faces)
-
- ;; ;; (font-lock-add-keywords
- ;; ;; 'c-mode
- ;; ;; '(("\\<{}\\>"
- ;; ;; 1 'font-lock-control-face)))
-
- ;; (defun ctr-chars-hl ()
- ;; font-lock-add-keywords nil
- ;; '(("[-+*/=<>,;:(){}]" (0 font-lock-control-face))))
-
- ;; (dolist (hook '(python-mode-hook fortran-mode-hook c-mode-common-hook))
- ;; (add-hook hook #'ctr-chars-hl))
-
;; rainbow delimeters
-(add-hook 'lisp-mode-hook #'rainbow-delimitets-mode)
+(use-package rainbow-mode
+ :config (rainbow-mode t)
+
+ :hook (lisp-mode c-mode-common web-mode )
+)
#+END_SRC
@@ -550,14 +609,26 @@
#+END_SRC
*** vterm
-
#+BEGIN_SRC emacs-lisp
(use-package vterm
:load-path "/home/ryan/src/emacs-libvterm/"
:config
(let (vterm-install)
- (require 'vterm)))
+ (require 'vterm))
+(custom-set-faces
+
+ '(vterm-color-black ((t (:foreground "#3F3F3F" :background "#2B2B2B"))))
+ '(vterm-color-red ((t (:foreground "#AC7373" :background "#8C5353"))))
+ '(vterm-color-green ((t (:foreground "#7F9F7F" :background "#9FC59F"))))
+ '(vterm-color-yellow ((t (:foreground "#DFAF8F" :background "#9FC59F"))))
+ '(vterm-color-blue ((t (:foreground "#7CB8BB" :background "#4C7073"))))
+ '(vterm-color-magenta ((t (:foreground "#DC8CC3" :background "#CC9393"))))
+ '(vterm-color-cyan ((t (:foreground "#93E0E3" :background "#8CD0D3"))))
+ '(vterm-color-white ((t (:foreground "#DCDCCC" :background "#656555"))))
+
+ '(vterm-default-fg-color ((t (:inherit vterm-color-white))))
+ '(vterm-default-bg-color ((t (:inherit vterm-color-black))))))
#+END_SRC
** ssh
