Enable init-prog.

configs/init-functions.el

@@ -43,22 +43,14 @@
     	(insert current-line)
     	(decf n)))))
 
-;; Mostrar y ocultar el diff de la línea de git-gutter
-(defun git-gutter:toggle-popup-hunk ()
-  "Toggle 'git-gutter' hunk window."
-  (interactive)
-  (if (and (get-buffer "*git-gutter:diff*") (window-live-p (git-gutter:popup-buffer-window)))
-      (delete-window (git-gutter:popup-buffer-window))
-    (git-gutter:popup-hunk)))
-
 ;; Obtener el nombre del proyecto desde project.el
 (defun kj/project-name (&optional project)
   "Return the name for PROJECT.
 If PROJECT is not specified, assume current project root."
   (when-let* ((root (or project (kj/project-root)))) ;; <-- ¡Aquí está el cambio!
     (file-name-nondirectory
-      (directory-file-name
+     (directory-file-name
-       (file-name-directory root)))))
+      (file-name-directory root)))))
 
 ;; Obtener la raíz del proyecto desde project.el
 (defun kj/project-root ()

configs/init-prog.el

@@ -118,8 +118,7 @@
   :autoload (devdocs--installed-docs devdocs--available-docs)
   :commands (devdocs-install devdocs-lookup)
   :bind (:map prog-mode-map
-         ("M-<f1>" . devdocs-dwim)
+              ("M-<f1>" . devdocs-dwim))
-         ("C-h D"  . devdocs-dwim))
   :init
   (defconst devdocs-major-mode-docs-alist
     '((c-mode          . ("c"))
@@ -168,21 +167,7 @@ Install the doc if it's not installed."
 ;; ---------------------------------------------------------------------------
 ;; Miscellaneous Programming Modes
 ;; ---------------------------------------------------------------------------
-(use-package csv-mode)
-(unless emacs/>=29p
-  (use-package csharp-mode))
-(use-package cask-mode)
 (use-package cmake-mode)
-(use-package dart-mode)
-(use-package julia-mode)
-(use-package lua-mode)
-(use-package mermaid-mode)
-(use-package powershell)
-(use-package scala-mode)
-(use-package swift-mode)
-(use-package v-mode)
-(use-package vimrc-mode)
-(use-package yaml-mode)  ; Modo yaml
 (use-package nginx-mode) ; Modo para leer archivos de configuración de nginx
 
 ;; Major mode para archivos CSV
@@ -225,4 +210,5 @@ Install the doc if it's not installed."
   :hook ((js-base-mode css-mode sgml-mode web-mode) . prettier-mode)
   :init (setq prettier-pre-warm 'none))
 
+(provide 'init-prog)
 ;;; init-prog.el ends here

configs/init-utils.el

@@ -48,16 +48,6 @@
                                           (right-fringe . 8)))
     (which-key-posframe-mode 1)))
 
-;; Fast search tool `ripgrep'
-(use-package rg
-  :hook (after-init . rg-enable-default-bindings)
-  :bind (:map rg-global-map
-              ("c" . rg-dwim-current-dir)
-              ("f" . rg-dwim-current-file)
-              ("m" . rg-menu))
-  :init (setq rg-show-columns t)
-  :config (add-to-list 'rg-custom-type-aliases '("tmpl" . "*.tmpl")))
-
 ;; Process
 (use-package proced
   :ensure nil

init.el

@@ -43,6 +43,7 @@
 (require 'init-utils)
 (require 'init-ui)
 (require 'init-editor)
+(require 'init-prog)
 (require 'init-highlight)
 (require 'init-theme)
 (require 'init-ai)