Add missing requires to use-package macros
Some checks are pending
/ Test config on ${{matrix.node}} (20) (push) Waiting to run

This commit is contained in:
Maciej 2024-07-22 07:43:42 +03:00
parent a82e24839c
commit 9f73e90317
Signed by: maciej
GPG key ID: 41D62D42D3B0D765
19 changed files with 67 additions and 65 deletions

View file

@ -5,7 +5,7 @@
(require '+custom-pkg-prog-mode "$HOME/.emacs.d/pkg/prog-mode.el") (require '+custom-pkg-prog-mode "$HOME/.emacs.d/pkg/prog-mode.el")
(use-package dart-mode :straight t :defer t) (use-package dart-mode :straight t :defer t)
(use-package lsp-dart :defer t :straight t) (use-package lsp-dart :defer t :straight t :requires (dart-mode lsp))
(defun +custom-lang-dart/activate-dart-mode () (defun +custom-lang-dart/activate-dart-mode ()
"Reconfigure dart mode for your own purposes." "Reconfigure dart mode for your own purposes."

View file

@ -4,7 +4,7 @@
(require '+custom-pkg-prog-mode "$HOME/.emacs.d/pkg/prog-mode.el") (require '+custom-pkg-prog-mode "$HOME/.emacs.d/pkg/prog-mode.el")
(use-package dhall-mode :straight t :defer t) (use-package dhall-mode :straight t :defer t :requires (lsp))
(defun +custom-lang-dhall/activate-dhall-mode () (defun +custom-lang-dhall/activate-dhall-mode ()
"Reconfigure dhall mode for your own purposes." "Reconfigure dhall mode for your own purposes."

View file

@ -6,8 +6,8 @@
(require '+custom-pkg-flycheck "$HOME/.emacs.d/pkg/flycheck.el") (require '+custom-pkg-flycheck "$HOME/.emacs.d/pkg/flycheck.el")
(require '+custom-pkg-transient "$HOME/.emacs.d/pkg/transient.el") (require '+custom-pkg-transient "$HOME/.emacs.d/pkg/transient.el")
(use-package elixir-mode :requires (lsp-mode lsp-ui) :straight t) (use-package elixir-mode :defer t :straight t)
(use-package elixir-ts-mode :requires (lsp-mode lsp-ui) :straight t) (use-package elixir-ts-mode :requires (elixir-mode lsp-mode lsp-ui) :straight t)
(add-to-list 'auto-mode-alist '("\\.exs\\'" . elixir-ts-mode)) (add-to-list 'auto-mode-alist '("\\.exs\\'" . elixir-ts-mode))
(add-to-list 'auto-mode-alist '("\\.ex\\'" . elixir-ts-mode)) (add-to-list 'auto-mode-alist '("\\.ex\\'" . elixir-ts-mode))

View file

@ -14,10 +14,8 @@
(require '+custom-pkg-flycheck "$HOME/.emacs.d/pkg/flycheck.el") (require '+custom-pkg-flycheck "$HOME/.emacs.d/pkg/flycheck.el")
(require '+custom-pkg-transient "$HOME/.emacs.d/pkg/transient.el") (require '+custom-pkg-transient "$HOME/.emacs.d/pkg/transient.el")
(use-package tree-sitter-indent :straight t)
(use-package gleam-mode (use-package gleam-mode
:requires (tree-sitter-indent) :requires (tree-sitter-indent lsp column-enforce-mode)
:straight '(:type git :straight '(:type git
:host github :host github
:repo "gleam-lang/gleam-mode" :repo "gleam-lang/gleam-mode"

View file

@ -11,6 +11,7 @@
:host github :host github
:repo "leanprover/lean4-mode" :repo "leanprover/lean4-mode"
:files ("*.el" "data")) :files ("*.el" "data"))
:requires (lsp)
:defer t) :defer t)
(defun activate-lean-mode () (defun activate-lean-mode ()

View file

@ -22,7 +22,7 @@
(add-to-list 'auto-mode-alist '("\\.graphqls\\'" . graphql-mode)) (add-to-list 'auto-mode-alist '("\\.graphqls\\'" . graphql-mode))
;; Yaml ;; Yaml
(use-package yaml-mode :straight t :defer t) (use-package yaml-mode :straight t :defer t :requires (lsp))
(defun +custom-lang-yaml/activate-yaml-mode () (defun +custom-lang-yaml/activate-yaml-mode ()
"Activate yaml-mode." "Activate yaml-mode."

View file

@ -12,7 +12,7 @@
(use-package flycheck-rust (use-package flycheck-rust
:straight t :straight t
:defer t :defer t
:requires (rust-mode)) :requires (rust-mode lsp))
(defun activate-rust-mode () (defun activate-rust-mode ()
"All things for Rust mode." "All things for Rust mode."

View file

@ -14,7 +14,7 @@
(require '+custom-pkg-ctags "$HOME/.emacs.d/pkg/ctags.el") (require '+custom-pkg-ctags "$HOME/.emacs.d/pkg/ctags.el")
(require '+custom-pkg-prog-mode "$HOME/.emacs.d/pkg/prog-mode.el") (require '+custom-pkg-prog-mode "$HOME/.emacs.d/pkg/prog-mode.el")
(use-package zig-mode :straight t :defer t) (use-package zig-mode :straight t :defer t :requires (lsp))
(defun activate-zig-mode () (defun activate-zig-mode ()
"Goodies for editing zig files." "Goodies for editing zig files."

View file

@ -54,9 +54,9 @@
;; #====================== Backup config #============================== ;; #====================== Backup config #==============================
(setq backup-directory-alist (setq backup-directory-alist
`((".*" . "~/.emacs/backups/auto-save-list"))) `((".*" . "~/.emacs.d/backups/auto-save-list")))
(setq auto-save-file-name-transforms (setq auto-save-file-name-transforms
`((".*", "~/.emacs/backups/auto-save-list" t))) `((".*", "~/.emacs.d/backups/auto-save-list" t)))
(setq backup-by-copying t) (setq backup-by-copying t)
(setq delete-old-versions t (setq delete-old-versions t
@ -88,7 +88,9 @@
;;;;;;;;;;;;;;;;;;;;;; Tree sitter ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;; Tree sitter ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(use-package tree-sitter :straight t) (use-package tree-sitter :straight t)
(use-package tree-sitter-langs :straight t) (use-package tree-sitter-langs :straight t :requires (tree-sitter))
(use-package tree-sitter-indent :straight t)
(global-tree-sitter-mode) (global-tree-sitter-mode)
(add-hook 'tree-sitter-after-on-hook 'tree-sitter-hl-mode) (add-hook 'tree-sitter-after-on-hook 'tree-sitter-hl-mode)
@ -119,23 +121,24 @@
;;;;;;;;;;;;;;;;; Treemacs ;;;;;;;;;;;;;;;;; Treemacs
(use-package treemacs :straight t :defer t) (use-package treemacs :straight t :defer t)
(use-package treemacs-all-the-icons :straight t) (use-package treemacs-all-the-icons :defer t :requires (treemacs) :straight t
:config
(treemacs-load-theme "all-the-icons") (treemacs-load-theme "all-the-icons")
(treemacs-project-follow-mode t) (treemacs-project-follow-mode t))
;;;;;;;;;;;;;;;;; Record frequency of different commands. Review them later ;;;;;;;;;;;;;;;;; Record frequency of different commands. Review them later
(use-package keyfreq (use-package keyfreq
:defer t :defer t
:straight t) :straight t
:config
(keyfreq-mode t) (keyfreq-mode t)
(keyfreq-autosave-mode t) (keyfreq-autosave-mode t))
;;;;;;;;;;;;;;;;; Show hints about key combinations ;;;;;;;;;;;;;;;;; Show hints about key combinations
(use-package which-key (use-package which-key
:defer t :defer t
:straight t) :straight t
:config (which-key-mode t))
;;;;;;;;;;;;;;;;; Use C-n to create a new line ;;;;;;;;;;;;;;;;; Use C-n to create a new line
(setq next-line-add-newlines t) (setq next-line-add-newlines t)
@ -144,7 +147,5 @@
(setq-default bidi-paragraph-direction 'left-to-right (setq-default bidi-paragraph-direction 'left-to-right
bidi-inhibit-bpa t) bidi-inhibit-bpa t)
(which-key-mode t)
(provide '+custom-pkg-base) (provide '+custom-pkg-base)
;;; base.el ends here ;;; base.el ends here

View file

@ -10,10 +10,12 @@
(use-package yasnippet-snippets (use-package yasnippet-snippets
:straight t :straight t
:defer t :defer t
:requires (yasnippet)
:config :config
(unbind-key "C-c & C-n" yas-minor-mode-map) (unbind-key "C-c & C-n" yas-minor-mode-map)
(unbind-key "C-c & C-s" yas-minor-mode-map) (unbind-key "C-c & C-s" yas-minor-mode-map)
(unbind-key "C-c & C-v" yas-minor-mode-map)) (unbind-key "C-c & C-v" yas-minor-mode-map)
(yas-global-mode t))
(use-package company (use-package company
:commands (company-indent-or-complete-common company-yasnippet) :commands (company-indent-or-complete-common company-yasnippet)
@ -25,11 +27,10 @@
(use-package company-box (use-package company-box
:straight t :straight t
:defer t :defer t
:after company :requires (company)
:hook (((company-mode) . company-box-mode))) :hook (((company-mode) . company-box-mode)))
(global-company-mode t) (global-company-mode t)
(yas-global-mode t)
(setq-default (setq-default
company-minimum-prefix-length 3 ;; minimum prefix character number for auto complete. company-minimum-prefix-length 3 ;; minimum prefix character number for auto complete.

View file

@ -13,7 +13,7 @@
(use-package dashboard (use-package dashboard
:straight t :straight t
:config :config
(dashboard-setup-startup-hook)) (dashboard-setup-startup-hook)
(setq dashboard-footer-messages (setq dashboard-footer-messages
'("Happy coding!" "I showed you my source code, pls respond")) '("Happy coding!" "I showed you my source code, pls respond"))
@ -25,7 +25,7 @@
;; (bookmarks . 5) ;; (bookmarks . 5)
;; (agenda . 5) ;; (agenda . 5)
;; (registers . 5) ;; (registers . 5)
(projects . 5))) (projects . 5))))
(provide '+custom-pkg-dashboard) (provide '+custom-pkg-dashboard)
;;; dashboard.el ends here ;;; dashboard.el ends here

View file

@ -5,9 +5,15 @@
(require '+custom-pkg-keys-mode "$HOME/.emacs.d/pkg/keys-mode.el") (require '+custom-pkg-keys-mode "$HOME/.emacs.d/pkg/keys-mode.el")
(use-package counsel :straight t :defer t)
(use-package swiper :straight t :defer t)
(use-package helpful :straight t :defer t) (use-package helpful :straight t :defer t)
(use-package counsel :straight t :defer t :requires (helpful)
:config
;; Use helpful for showing Elisp documentation
(setq counsel-describe-function-function #'helpful-callable)
(setq counsel-describe-variable-function #'helpful-variable))
(use-package swiper :straight t :defer t)
(use-package ivy (use-package ivy
:requires (counsel swiper helpful) :requires (counsel swiper helpful)
@ -19,10 +25,6 @@
ivy-display-style 'fancy ;; Formatting style ivy-display-style 'fancy ;; Formatting style
)) ))
;; Use helpful for showing Elisp documentation
(setq counsel-describe-function-function #'helpful-callable)
(setq counsel-describe-variable-function #'helpful-variable)
(define-key +custom-keys-mode-map (kbd "C-c a") 'counsel-rg) (define-key +custom-keys-mode-map (kbd "C-c a") 'counsel-rg)
(define-key +custom-keys-mode-map (kbd "C-c t") 'counsel-find-file) (define-key +custom-keys-mode-map (kbd "C-c t") 'counsel-find-file)
(define-key +custom-keys-mode-map (kbd "C-c C-s") 'swiper) ;; Find things by regexp (define-key +custom-keys-mode-map (kbd "C-c C-s") 'swiper) ;; Find things by regexp

View file

@ -11,7 +11,7 @@
;;; Code: ;;; Code:
(define-minor-mode +custom-keys-mode (define-minor-mode +custom-keys-mode
"Minor mode for all of my personal key bindings" "Minor mode for all of my personal key bindings."
:global t :global t
:keymap (make-sparse-keymap)) :keymap (make-sparse-keymap))

View file

@ -16,6 +16,14 @@
lsp-lens-enable nil lsp-lens-enable nil
lsp-lens-mode nil lsp-lens-mode nil
read-process-output-max (* 1024 1024 2) read-process-output-max (* 1024 1024 2)
;; Disable the piece of shit vue LSP server. It activates itself in every
;; project with .js, .ts or .json file due to something called 'takeover
;; mode' or 'hybrid mode' or some such.
;; It would be okay, but it also doesn't work 99% of the time.
;; When needed, enable this hot garbage in dir-locals.el
lsp-disabled-clients '(vue-semantic-server)
lsp-log-io nil
lsp-enable-file-watchers nil) lsp-enable-file-watchers nil)
(unbind-key "s-l =" lsp-mode-map) (unbind-key "s-l =" lsp-mode-map)
(unbind-key "s-l G" lsp-mode-map) (unbind-key "s-l G" lsp-mode-map)
@ -58,21 +66,13 @@
(use-package lsp-ui (use-package lsp-ui
:straight t :straight t
:requires (lsp-mode) :requires (lsp-mode)
:defer t) :defer t
:config
(setq lsp-ui-doc-enable t (setq lsp-ui-doc-enable t
lsp-ui-header t lsp-ui-header t
lsp-ui-delay 0.5 ;; Wait half a second to display documentation lsp-ui-delay 0.5 ;; Wait half a second to display documentation
lsp-ui-doc-position 'at-point lsp-ui-doc-position 'at-point
lsp-ui-doc-include-signature t lsp-ui-doc-include-signature t))
;; Disable the piece of shit vue LSP server. It activates itself in every
;; project with .js, .ts or .json file due to something called 'takeover
;; mode' or 'hybrid mode' or some such.
;; It would be okay, but it also doesn't work 99% of the time.
;; When needed, enable this hot garbage in dir-locals.el
lsp-disabled-clients '(vue-semantic-server)
lsp-log-io nil)
;; Lsp debugger mode ;; Lsp debugger mode
(use-package dap-mode (use-package dap-mode

View file

@ -63,7 +63,7 @@
;; Ensure indentation in steps: ;; Ensure indentation in steps:
(defun set-indent (step) (defun set-indent (step)
"Set indentation to X STEPs." "Set indentation to STEP."
(interactive "NNumber of columns for one step: ") (interactive "NNumber of columns for one step: ")
(setq-local tab-width step) (setq-local tab-width step)
(setq-local tab-stop-list (number-sequence step 200 step))) (setq-local tab-stop-list (number-sequence step 200 step)))
@ -79,6 +79,5 @@
;; Formatter for many files ;; Formatter for many files
(use-package apheleia :straight t :defer t) (use-package apheleia :straight t :defer t)
(provide '+custom-pkg-prog-mode) (provide '+custom-pkg-prog-mode)
;;; prog-mode ends here ;;; prog-mode ends here

View file

@ -16,7 +16,7 @@
:straight t :straight t
:config (setq-default :config (setq-default
;; Save history to a specific folder ;; Save history to a specific folder
undo-tree-history-directory-alist '(("." . "~/.emacs/backups/undo-tree")) undo-tree-history-directory-alist '(("." . "~/.emacs.d/backups/undo-tree"))
;; Show diff ;; Show diff
undo-tree-visualizer-diff t undo-tree-visualizer-diff t
;; Show timestamps ;; Show timestamps

View file

@ -7,7 +7,7 @@
;;; Code: ;;; Code:
(require 'base16-theme) (use-package base16-theme :straight t :defer t)
(defvar base16-harmonic-light-modified-colors (defvar base16-harmonic-light-modified-colors
'(:base00 "#f7f9fb" '(:base00 "#f7f9fb"

View file

@ -7,7 +7,7 @@
;;; Code: ;;; Code:
(require 'base16-theme) (use-package base16-theme :straight t :defer t)
(defvar base16-summerfruit-light-modified-colors (defvar base16-summerfruit-light-modified-colors
'(:base00 "#fdfcfa" '(:base00 "#fdfcfa"

View file

@ -5,7 +5,7 @@
;; Based on harmonic-dark theme by Jannik Seibert (https://github.com/janniks) ;; Based on harmonic-dark theme by Jannik Seibert (https://github.com/janniks)
;;; Code: ;;; Code:
(require 'base16-theme) (use-package base16-theme :straight t :defer t)
(defvar base16-not-harmonic-colors (defvar base16-not-harmonic-colors
'(:base00 "#102941" '(:base00 "#102941"