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