Fold lisp/bandali-utils.el back into init.el

[~bandali/configs] / lisp / bandali-ebdb.el

diff --git a/lisp/bandali-ebdb.el b/lisp/bandali-ebdb.el
index 8b8f3c0..4d21978 100644 (file)
--- a/lisp/bandali-ebdb.el
+++ b/lisp/bandali-ebdb.el
@@ -1,44 +1,52 @@
-(use-package ebdb
-  :demand
-  :after gnus
-  :bind (:map gnus-group-mode-map ("e" . ebdb))
-  :config
-  (setq ebdb-sources (b/var "ebdb"))
-  (with-eval-after-load 'swiper
-    (add-to-list 'swiper-font-lock-exclude 'ebdb-mode t)))
+;;; bandali-ebdb.el --- bandali's EBDB configuration  -*- lexical-binding: t; -*-
 
-(use-package ebdb-com
-  :after ebdb)
+;; Copyright (C) 2018-2020  Amin Bandali
 
-(use-package ebdb-complete
-  :after ebdb
-  :config
-  ;; (setq ebdb-complete-mail 'capf)
-  (ebdb-complete-enable))
+;; Author: Amin Bandali <bandali@gnu.org>
+;; Keywords: tools
 
-(use-package ebdb-message
-  :demand
-  :after ebdb)
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
 
-;; (use-package company-ebdb
-;;   :config
-;;   (defun company-ebdb--post-complete (_) nil))
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
 
-(use-package ebdb-gnus
-  :demand
-  :after ebdb
-  :custom
-  (ebdb-gnus-window-size 0.3))
+;;; Commentary:
 
-(use-package ebdb-mua
-  :demand
-  :after ebdb
-  :custom (ebdb-mua-pop-up t))
+;; My EBDB setup.
 
-;; (use-package ebdb-message
-;;   :after ebdb)
+;;; Code:
+
+(with-eval-after-load 'gnus
+  (require 'ebdb)
+  (csetq ebdb-sources (b/var "ebdb"))
+  (with-eval-after-load 'swiper
+    (add-to-list 'swiper-font-lock-exclude #'ebdb-mode t))
+  ;; local key bindings
+  (define-key gnus-group-mode-map (kbd "e") #'ebdb))
 
-;; (use-package ebdb-vcard
-;;   :after ebdb)
+(with-eval-after-load 'ebdb
+  (with-eval-after-load 'ebdb-complete
+    ;; (csetq ebdb-complete-mail 'capf)
+    (ebdb-complete-enable))
+
+  (require 'ebdb-message)
+  
+  (require 'ebdb-gnus)
+  (csetq ebdb-gnus-window-size 0.3)
+
+  (require 'ebdb-mua)
+  (csetq ebdb-mua-pop-up t))
+
+;; (with-eval-after-load 'company-ebdb
+;;   (defun company-ebdb--post-complete (_) nil))
 
 (provide 'bandali-ebdb)
+;;; bandali-ebdb.el ends here