Fix citre.

configs/base-ctags.el

@@ -24,6 +24,12 @@
   (setq citre-auto-enable-citre-mode-modes '(prog-mode))
   :config
   (with-no-warnings
+    (setq citre-readtags-program "/usr/bin/readtags"
+          citre-ctags-program "/usr/bin/ctags"
+          citre-default-create-tags-file-location 'global-cache
+          citre-use-project-root-when-creating-tags t
+          citre-prompt-language-for-ctags-command t)
+
     (with-eval-after-load 'projectile
       (setq citre-project-root-function #'projectile-project-root))
 
@@ -41,13 +47,8 @@
 
     (defun lsp-citre-capf-function ()
       "A capf backend that tries lsp first, then Citre."
-      (let ((lsp-result (pcase centaur-lsp
-                          ('lsp-mode
-                           (and (fboundp #'lsp-completion-at-point)
-                                (lsp-completion-at-point)))
-                          ('eglot
-                           (and (fboundp #'eglot-completion-at-point)
-                                (eglot-completion-at-point))))))
+      (let ((lsp-result (if (bound-and-true-p lsp-mode)
+                            (lsp-completion-at-point))))
         (if (and lsp-result
                  (try-completion
                   (buffer-substring (nth 0 lsp-result)
@@ -60,7 +61,8 @@
       "Enable the lsp + Citre capf backend in current buffer."
       (add-hook 'completion-at-point-functions #'lsp-citre-capf-function nil t))
 
-    (add-hook 'citre-mode-hook #'enable-lsp-citre-capf-backend)))
+    (add-hook 'citre-mode-hook #'enable-lsp-citre-capf-backend)
+  ))
 
 (provide 'base-ctags)
 ;;; base-ctags.el ends here

configs/base-extensions.el

@@ -177,6 +177,21 @@
                        file)))
   )
 
+;; Polymode
+(use-package polymode
+  :defer t
+  :straight t)
+
+;; Polymode para markdown
+(use-package poly-markdown
+  :defer t
+  :straight t)
+
+;; Polymode para org-Mode
+(use-package poly-org
+  :defer t
+  :straight t)
+
 ;; Paquete para manejo de proyectos
 (use-package projectile
   :defer t

configs/base-lsp.el

@@ -20,10 +20,9 @@
              lsp-format-buffer
              lsp-organize-imports
              lsp-install-server)
-  :hook ((prog-mode . (lambda ()
-                        (unless (derived-mode-p 'emacs-lisp-mode 'lisp-mode 'makefile-mode)
-                          (lsp-deferred))))
-         (markdown-mode . lsp-deferred)
+  :hook ((markdown-mode . lsp-deferred)
+         (js-mode . lsp-deferred)
+         (php-mode . lsp-deferred)
          (lsp-mode . lsp-enable-which-key-integration))
   :custom
   (lsp-headerline-breadcrumb-enable nil)