From b9afc66ee2a0969b11e266a00d971da7c4250a18 Mon Sep 17 00:00:00 2001
From: KJ <webmaster@outcontrol.net>
Date: Wed, 2 Aug 2023 03:33:34 -0400
Subject: [PATCH] Remove company-mode config.

This config is not necessary anymore because now corfu make
the same and for now is the preferred option for me.
---
 configs/init-company.el    | 61 --------------------------------------
 configs/init-eglot.el      |  1 -
 configs/init-minibuffer.el |  2 --
 configs/init-org.el        |  1 -
 init.el                    |  1 -
 5 files changed, 66 deletions(-)
 delete mode 100644 configs/init-company.el

diff --git a/configs/init-company.el b/configs/init-company.el
deleted file mode 100644
index 3d3260e..0000000
--- a/configs/init-company.el
+++ /dev/null
@@ -1,61 +0,0 @@
-;;; init-company.el --- Autocompletado con company-mode  -*- lexical-binding: t -*-
-
-;; Author: kj <webmaster@outcontrol.net>
-;; URL: https://git.kj2.me/kj/confi-emacs-actual
-
-;;; Commentary:
-
-;; Archivo de configuración específico para el paquete company.
-;; Company, de manera resumida, es el que nos muestra el autocompletado
-;; en Emacs, tanto para código como para otro tipo de textos.
-
-;;; Code:
-
-(use-package company
-  :defer t
-  :straight t
-  :defines (company-dabbrev-ignore-case company-dabbrev-downcase)
-  :custom-face
-  (company-box-selection ((t (:inherit company-tooltip :weight semibold :extend t))))
-  :hook (after-init . global-company-mode)
-  :bind (
-         :map company-active-map
-         ("<tab>" . company-indent-or-complete-common) ; Completar con tab como en la terminal de linux
-         ("<escape>" . company-abort) ; Cerrar company con ESC
-         )
-  :config
-  (setq company-tooltip-align-annotations t
-        company-tooltip-limit 12
-        company-idle-delay 0.5              ; mostrar autocompletado luego de medio segundo mostrar
-        company-echo-delay (if (display-graphic-p) nil 0)
-        company-minimum-prefix-length 1    ; mostrar autocompletado desde que se coloca la primera letra.
-        company-icon-margin 3
-        company-require-match nil
-        company-dabbrev-ignore-case nil
-        company-dabbrev-downcase nil      ; autocompletado case-sensitive.
-        company-global-modes '(not erc-mode message-mode help-mode
-                                   gud-mode eshell-mode shell-mode))
-  (add-to-list 'company-backends 'company-paths)
-  )
-
-;; Rutas en company
-(use-package company-paths
-  :straight (company-paths :type git :host github :repo "emacs-vs/company-paths")
-  :defer t
-  :after (company-mode)
-  )
-
-;; Hacer que el autocompletado se vea más bonito con íconos
-(use-package company-box
-  :defer t
-  :straight t
-  :diminish
-  :hook (company-mode . company-box-mode)
-  :config
-  (setq company-box-backends-colors nil
-              company-box-doc-delay 0.1
-              company-box-scrollbar 'right)
-  )
-
-(provide 'init-company)
-;;; init-company.el ends here
diff --git a/configs/init-eglot.el b/configs/init-eglot.el
index 5328fed..11bde11 100644
--- a/configs/init-eglot.el
+++ b/configs/init-eglot.el
@@ -40,7 +40,6 @@
   :config
   ;; (add-to-list 'eglot-server-programs '(php-mode . ("intelephense" "--stdio")))
   (add-to-list 'eglot-server-programs '(php-mode . ("phpactor" "language-server" "-vvv")))
-  (setq eglot-stay-out-of '(company))
   ;; (add-to-list 'eglot-ignored-server-capabilites :hoverProvider)
   ;; (add-to-list 'eglot-server-programs '(css-mode . ("vscode-css-language-server" "--stdio")))
   ;; (add-to-list 'eglot-server-programs '(html-mode . ("vscode-html-language-server" "--stdio")))
diff --git a/configs/init-minibuffer.el b/configs/init-minibuffer.el
index 000c18b..c607ee0 100644
--- a/configs/init-minibuffer.el
+++ b/configs/init-minibuffer.el
@@ -57,8 +57,6 @@
         ivy-use-virtual-buffers t    ; Enable bookmarks and recentf
         ivy-fixed-height-minibuffer t
         ivy-count-format "(%d/%d) "
-        ivy-ignore-buffers '("\\` " "\\`\\*tramp/" "\\`\\*xref" "\\`\\*helpful "
-                             "\\`\\*.+-posframe-buffer\\*" "\\` ?\\*company-.+\\*")
         ivy-on-del-error-function #'ignore
         ivy-initial-inputs-alist nil)
 
diff --git a/configs/init-org.el b/configs/init-org.el
index 6ec1fd3..d1dec07 100644
--- a/configs/init-org.el
+++ b/configs/init-org.el
@@ -56,7 +56,6 @@
   :hook
   (org-mode . kj/org-hook)
   :config
-  (setq company-dabbrev-ignore-case nil) ; Hacer el autocompletado case-sensitive.
   (setq org-ellipsis " ▾")
   (setq org-hide-emphasis-markers t)
   ;;(setq org-startup-folded 'content)
diff --git a/init.el b/init.el
index 9b4b3ee..a2de3ab 100644
--- a/init.el
+++ b/init.el
@@ -19,7 +19,6 @@
 (require 'init-functions)
 (require 'init-org)
 (require 'init-eglot)
-;; (require 'init-company)
 (require 'init-corfu)
 (require 'init-ctags)
 (require 'init-minibuffer)