kj/confi-emacs-actual
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Disable editorconfig and devdocs.

Browse Source 
I barely need that. I will enable it when I need it.
This commit is contained in:
kj
2025-08-07 21:40:34 -03:00
parent ecbb0e7fe9
commit fac74ab714
1 changed files with 47 additions and 47 deletions
Download Patch File Download Diff File Expand all files Collapse all files

94
configs/init-prog.el
View File

@ -36,9 +36,9 @@
xref-show-xrefs-function #'xref-show-definitions-completing-read)) xref-show-xrefs-function #'xref-show-definitions-completing-read))
;; Code styles ;; Code styles
(use-package editorconfig ;; (use-package editorconfig
:diminish ;; :diminish
:hook (elpaca-after-init . editorconfig-mode)) ;; :hook (elpaca-after-init . editorconfig-mode))
;; Correr el código desde el buffer de emacs ;; Correr el código desde el buffer de emacs
(use-package quickrun (use-package quickrun
@ -96,55 +96,55 @@
(sit-for 0.75))))) (sit-for 0.75)))))
;; Browse devdocs.io documents using EWW ;; Browse devdocs.io documents using EWW
(use-package devdocs ;; (use-package devdocs
:autoload (devdocs--installed-docs devdocs--available-docs) ;; :autoload (devdocs--installed-docs devdocs--available-docs)
:commands (devdocs-install devdocs-lookup) ;; :commands (devdocs-install devdocs-lookup)
:bind (:map prog-mode-map ;; :bind (:map prog-mode-map
("M-<f1>" . devdocs-dwim)) ;; ("M-<f1>" . devdocs-dwim))
:init ;; :init
(defconst devdocs-major-mode-docs-alist ;; (defconst devdocs-major-mode-docs-alist
'((c-mode . ("c")) ;; '((c-mode . ("c"))
(c++-mode . ("cpp")) ;; (c++-mode . ("cpp"))
(python-mode . ("python~3.10" "python~2.7")) ;; (python-mode . ("python~3.10" "python~2.7"))
(ruby-mode . ("ruby~3.1")) ;; (ruby-mode . ("ruby~3.1"))
(rustic-mode . ("rust")) ;; (rustic-mode . ("rust"))
(css-mode . ("css")) ;; (css-mode . ("css"))
(html-mode . ("html")) ;; (html-mode . ("html"))
(julia-mode . ("julia~1.8")) ;; (julia-mode . ("julia~1.8"))
(js-mode . ("javascript" "jquery")) ;; (js-mode . ("javascript" "jquery"))
(emacs-lisp-mode . ("elisp"))) ;; (emacs-lisp-mode . ("elisp")))
"Alist of major-mode and docs.") ;; "Alist of major-mode and docs.")
(mapc ;; (mapc
(lambda (mode) ;; (lambda (mode)
(add-hook (intern (format "%s-hook" (car mode))) ;; (add-hook (intern (format "%s-hook" (car mode)))
(lambda () ;; (lambda ()
(setq-local devdocs-current-docs (cdr mode))))) ;; (setq-local devdocs-current-docs (cdr mode)))))
devdocs-major-mode-docs-alist) ;; devdocs-major-mode-docs-alist)
(setq devdocs-data-dir (expand-file-name "devdocs" user-emacs-directory)) ;; (setq devdocs-data-dir (expand-file-name "devdocs" user-emacs-directory))
(defun devdocs-dwim() ;; (defun devdocs-dwim()
"Look up a DevDocs documentation entry. ;; "Look up a DevDocs documentation entry.
Install the doc if it's not installed." ;; Install the doc if it's not installed."
(interactive) ;; (interactive)
;; Install the doc if it's not installed ;; ;; Install the doc if it's not installed
(mapc ;; (mapc
(lambda (slug) ;; (lambda (slug)
(unless (member slug (let ((default-directory devdocs-data-dir)) ;; (unless (member slug (let ((default-directory devdocs-data-dir))
(seq-filter #'file-directory-p ;; (seq-filter #'file-directory-p
(when (file-directory-p devdocs-data-dir) ;; (when (file-directory-p devdocs-data-dir)
(directory-files "." nil "^[^.]"))))) ;; (directory-files "." nil "^[^.]")))))
(mapc ;; (mapc
(lambda (doc) ;; (lambda (doc)
(when (string= (alist-get 'slug doc) slug) ;; (when (string= (alist-get 'slug doc) slug)
(devdocs-install doc))) ;; (devdocs-install doc)))
(devdocs--available-docs)))) ;; (devdocs--available-docs))))
(alist-get major-mode devdocs-major-mode-docs-alist)) ;; (alist-get major-mode devdocs-major-mode-docs-alist))
;; Lookup the symbol at point ;; ;; Lookup the symbol at point
(devdocs-lookup nil (thing-at-point 'symbol t)))) ;; (devdocs-lookup nil (thing-at-point 'symbol t))))
;; --------------------------------------------------------------------------- ;; ---------------------------------------------------------------------------
;; Miscellaneous Programming Modes ;; Miscellaneous Programming Modes