From b0873bc9b65b8781a738cac6676be7a4009a3db9 Mon Sep 17 00:00:00 2001
From: Gerard Vermeulen <gerard.vermeulen@posteo.net>
Date: Mon, 24 Jun 2024 09:29:59 +0200
Subject: [PATCH] Set `company-backends' to a restrictive set of backends

---
 README.org | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/README.org b/README.org
index c63b793..a7e4e67 100644
--- a/README.org
+++ b/README.org
@@ -1382,6 +1382,12 @@ sets it up after ensuring its installation.
 #+name: lst:setup-company
 #+begin_src emacs-lisp -n :results silent
 (when (ensure-package-installation 'company)
+  (with-eval-after-load 'company
+    ;; GAV: Set `company-backends' more restrictively than `company'.
+    (setopt company-backends
+            '(company-capf company-files
+                           (company-dabbrev-code company-keywords)
+                           company-dabbrev)))
   ;; GAV: `desktop' may enable `company-mode' for files it remembers.
   (add-hook 'emacs-lisp-mode-hook #'company-mode)
   (add-hook 'lisp-interaction-mode-hook #'company-mode)