Lazy-load company-mode

core/defuns/defuns-company.el

@@ -54,7 +54,9 @@
 (defun doom/company-complete ()
   "Bring up the completion popup. If there is only one result, auto-complete it."
   (interactive)
-  (when (and (company-manual-begin)
+  (require 'company)
+  (when (and (bound-and-true-p company-mode)
+             (company-manual-begin)
              (= company-candidates-length 1))
     (company-complete-common)))
 

core/defuns/macros-company.el

@@ -10,6 +10,7 @@
          (quoted (eq (car-safe backends) 'quote)))
     `(progn
        (defun ,def-name ()
+         (require 'company)
          (set (make-local-variable 'company-backends)
               (append '((,@(mapcar (lambda (backend)
                                      (if quoted