git.fiddlerwoaroof.com
Browse code

emacs: remove useless configs

Ed Langley authored on 27/07/2019 22:34:58
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))