From 910bfeabbda9ed4904408bb8e0cfb7fd360fcd80 Mon Sep 17 00:00:00 2001
From: rekado <rekado@elephly.net>
Date: Sun, 31 Jul 2016 21:25:55 +0200
Subject: move completion config to init.org.

---
 init.org                | 31 ++++++++++++++++++++++++++++++-
 lisp/init-completion.el | 16 ----------------
 2 files changed, 30 insertions(+), 17 deletions(-)
 delete mode 100644 lisp/init-completion.el

diff --git a/init.org b/init.org
index d4ebceb..3d9f782 100644
--- a/init.org
+++ b/init.org
@@ -560,6 +560,34 @@ The default prompt face makes it hard to see the prompt.
 (require 'ido)
 #+END_SRC
 
+* Completion
+:PROPERTIES:
+:noweb-ref: completion
+:END:
+
+#+BEGIN_SRC elisp
+(add-hook 'after-init-hook 'global-company-mode)
+(setq company-idle-delay 0.5)
+(define-key company-mode-map (kbd "C-c <tab>") 'company-complete)
+
+(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))))))
+#+END_SRC
+
+#+BEGIN_SRC elisp :noweb-ref completion-lazy
+(provide 'my/init-completion)
+(with-eval-after-load "company"
+  <<completion>>
+  )
+(require 'company)
+#+END_SRC
+
 * TODO Initial stuff
 :PROPERTIES:
 :noweb-ref: initial
@@ -719,7 +747,7 @@ still need to process all of this and clean it up.
 
 (load "email.el")
 (require 'my/init-org)
-(load "init-completion.el")
+(require 'my/init-completion)
 (load "init-geiser.el")
 (load "init-gnus.el")
 (require 'my/init-magit)
@@ -801,6 +829,7 @@ put them all together to build the init file
 <<tramp>>
 <<shell>>
 <<ido-lazy>>
+<<completion-lazy>>
 <<initial-after-packages>>
 <<org-mode-lazy>>
 <<magit-lazy>>
diff --git a/lisp/init-completion.el b/lisp/init-completion.el
deleted file mode 100644
index 03d14ad..0000000
--- a/lisp/init-completion.el
+++ /dev/null
@@ -1,16 +0,0 @@
-(require 'company)
-(add-hook 'after-init-hook 'global-company-mode)
-(setq company-idle-delay 0.5)
-(define-key company-mode-map (kbd "C-c <tab>") 'company-complete)
-
-(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))))))
-
-
-- 
cgit v1.2.3