Browse code
emacs: remove useless configs
Showing 2 changed files
... | ... |
@@ -30,8 +30,6 @@ |
30 | 30 |
|
31 | 31 |
(cold-boot) |
32 | 32 |
|
33 |
-;; (use-package color-theme-modern :ensure t) |
|
34 |
-;; (use-package zenburn-theme :ensure t) |
|
35 | 33 |
(load-package-configuration 'evil) |
36 | 34 |
|
37 | 35 |
(use-package multifiles |
... | ... |
@@ -105,7 +103,6 @@ |
105 | 103 |
(define-key company-active-map (kbd "{") (kbd "RET SPC {")) |
106 | 104 |
(define-key company-active-map (kbd "[") (kbd "RET ["))) |
107 | 105 |
|
108 |
- ;;(message "backends: %s" company-backends) |
|
109 | 106 |
(setq company-backends |
110 | 107 |
'(company-clang |
111 | 108 |
company-bbdb |
... | ... |
@@ -653,8 +650,6 @@ With a prefix ARG invalidates the cache first." |
653 | 650 |
string nil nil nil 1)) |
654 | 651 |
string))))) |
655 | 652 |
|
656 |
- |
|
657 |
- |
|
658 | 653 |
(defun fwoar/cc-camel-kebab (start end) |
659 | 654 |
(interactive "*r") |
660 | 655 |
(let ((target (buffer-substring start end))) |
... | ... |
@@ -668,8 +663,6 @@ With a prefix ARG invalidates the cache first." |
668 | 663 |
(lambda (n) |
669 | 664 |
(directory-files n nil "^package.json$"))))) |
670 | 665 |
|
671 |
- |
|
672 |
- |
|
673 | 666 |
(defun find-package-json (default-directory) |
674 | 667 |
(interactive "D") |
675 | 668 |
(message "pakcage json: %s"(fwoar--find-package-json)) |
... | ... |
@@ -679,48 +672,6 @@ With a prefix ARG invalidates the cache first." |
679 | 672 |
(cl-defmethod fwoar--find-system (&context (major-mode (derived-mode js-mode))) |
680 | 673 |
(find-package-json default-directory)) |
681 | 674 |
|
682 |
- |
|
683 |
-(comment |
|
684 |
- (use-package paredit |
|
685 |
- :ensure t |
|
686 |
- :config |
|
687 |
- (defparedit-wrapper back-then-wrap paredit-wrap-sexp) |
|
688 |
- (defparedit-wrapper back-then-wrap-square paredit-wrap-square) |
|
689 |
- (defparedit-wrapper back-then-wrap-curly paredit-wrap-curly) |
|
690 |
- (defparedit-wrapper back-then-wrap-angled paredit-wrap-angled) |
|
691 |
- (defparedit-wrapper back-then-wrap-doublequote paredit-meta-doublequote) |
|
692 |
- (define-key evil-normal-state-map ",W" 'back-then-wrap) |
|
693 |
- (define-key evil-normal-state-map ",w]" 'back-then-wrap-square) |
|
694 |
- (define-key evil-normal-state-map ",w}" 'back-then-wrap-curly) |
|
695 |
- (define-key evil-normal-state-map ",w>" 'back-then-wrap-angled) |
|
696 |
- (define-key evil-normal-state-map ",w\"" 'back-then-wrap-doublequote) |
|
697 |
- |
|
698 |
- (define-key evil-normal-state-map ",S" 'paredit-splice-sexp) |
|
699 |
- (define-key evil-normal-state-map ",A" 'paredit-splice-sexp-killing-backward) |
|
700 |
- (define-key evil-normal-state-map ",D" 'paredit-splice-sexp-killing-forward) |
|
701 |
- (define-key evil-normal-state-map ",|" 'paredit-split-sexp) |
|
702 |
- (define-key evil-normal-state-map ",J" 'paredit-join-sexps) |
|
703 |
- (define-key evil-normal-state-map ",<" 'paredit-backward-slurp-sexp) |
|
704 |
- (define-key evil-normal-state-map ",," 'paredit-backward-barf-sexp) |
|
705 |
- (define-key evil-normal-state-map ",>" 'paredit-forward-slurp-sexp) |
|
706 |
- (define-key evil-normal-state-map ",." 'paredit-forward-barf-sexp) |
|
707 |
- (define-key evil-normal-state-map ",~" 'paredit-convolute-sexp)) |
|
708 |
- |
|
709 |
- (use-package erc |
|
710 |
- :config |
|
711 |
- (add-hook 'erc-insert-post-hook 'erc-truncate-buffer)) |
|
712 |
- |
|
713 |
- (use-package ansi-term :no-require t |
|
714 |
- :config |
|
715 |
- (eval-after-load 'evil |
|
716 |
- (evil-set-initial-state 'term-mode 'emacs))) |
|
717 |
- |
|
718 |
- (defun ansi-term-post (&rest r) |
|
719 |
- (message "Loading ansi term...") |
|
720 |
- (evil-set-initial-state 'term-mode 'emacs)) |
|
721 |
- |
|
722 |
- (advice-add 'ansi-term :after 'ansi-term-post)) |
|
723 |
- |
|
724 | 675 |
(use-package org-brain :ensure t |
725 | 676 |
:init |
726 | 677 |
(setq org-brain-path "~/org-brain/") |
727 | 678 |
new file mode 100644 |
... | ... |
@@ -0,0 +1,40 @@ |
1 |
+(comment |
|
2 |
+ (use-package paredit |
|
3 |
+ :ensure t |
|
4 |
+ :config |
|
5 |
+ (defparedit-wrapper back-then-wrap paredit-wrap-sexp) |
|
6 |
+ (defparedit-wrapper back-then-wrap-square paredit-wrap-square) |
|
7 |
+ (defparedit-wrapper back-then-wrap-curly paredit-wrap-curly) |
|
8 |
+ (defparedit-wrapper back-then-wrap-angled paredit-wrap-angled) |
|
9 |
+ (defparedit-wrapper back-then-wrap-doublequote paredit-meta-doublequote) |
|
10 |
+ (define-key evil-normal-state-map ",W" 'back-then-wrap) |
|
11 |
+ (define-key evil-normal-state-map ",w]" 'back-then-wrap-square) |
|
12 |
+ (define-key evil-normal-state-map ",w}" 'back-then-wrap-curly) |
|
13 |
+ (define-key evil-normal-state-map ",w>" 'back-then-wrap-angled) |
|
14 |
+ (define-key evil-normal-state-map ",w\"" 'back-then-wrap-doublequote) |
|
15 |
+ |
|
16 |
+ (define-key evil-normal-state-map ",S" 'paredit-splice-sexp) |
|
17 |
+ (define-key evil-normal-state-map ",A" 'paredit-splice-sexp-killing-backward) |
|
18 |
+ (define-key evil-normal-state-map ",D" 'paredit-splice-sexp-killing-forward) |
|
19 |
+ (define-key evil-normal-state-map ",|" 'paredit-split-sexp) |
|
20 |
+ (define-key evil-normal-state-map ",J" 'paredit-join-sexps) |
|
21 |
+ (define-key evil-normal-state-map ",<" 'paredit-backward-slurp-sexp) |
|
22 |
+ (define-key evil-normal-state-map ",," 'paredit-backward-barf-sexp) |
|
23 |
+ (define-key evil-normal-state-map ",>" 'paredit-forward-slurp-sexp) |
|
24 |
+ (define-key evil-normal-state-map ",." 'paredit-forward-barf-sexp) |
|
25 |
+ (define-key evil-normal-state-map ",~" 'paredit-convolute-sexp)) |
|
26 |
+ |
|
27 |
+ (use-package erc |
|
28 |
+ :config |
|
29 |
+ (add-hook 'erc-insert-post-hook 'erc-truncate-buffer)) |
|
30 |
+ |
|
31 |
+ (use-package ansi-term :no-require t |
|
32 |
+ :config |
|
33 |
+ (eval-after-load 'evil |
|
34 |
+ (evil-set-initial-state 'term-mode 'emacs))) |
|
35 |
+ |
|
36 |
+ (defun ansi-term-post (&rest r) |
|
37 |
+ (message "Loading ansi term...") |
|
38 |
+ (evil-set-initial-state 'term-mode 'emacs)) |
|
39 |
+ |
|
40 |
+ (advice-add 'ansi-term :after 'ansi-term-post)) |