Clean up some variable problems
Some checks failed
/ Test config on 20 (push) Failing after 50s

This commit is contained in:
Maciej 2026-04-01 14:11:52 +03:00
parent 8115d07ddf
commit 58483d3943
Signed by: maciej
GPG key ID: 28243AF437E32F99
8 changed files with 60 additions and 30 deletions

View file

@ -1,4 +1,4 @@
;;; +early-init.el --- summary ;;; +early-init.el --- summary -*- lexical-binding: t; -*-
;; Author: Maciej Szlosarczyk ;; Author: Maciej Szlosarczyk
;; Maintainer: Maciej Szlosarczyk ;; Maintainer: Maciej Szlosarczyk

View file

@ -6,7 +6,9 @@
;;; helpful. ;;; helpful.
;;; ;;;
;;; Code: ;;; Code:
(eval-when-compile (defvar icejam-keys-mode-map)) (eval-when-compile
(defvar icejam-keys-mode-map)
(defvar crm-separator))
;; Preparations for using Vertico/Orderless ;; Preparations for using Vertico/Orderless
(setopt (setopt
@ -21,6 +23,7 @@
'(read-only t cursor-intangible t face minibuffer-prompt)) '(read-only t cursor-intangible t face minibuffer-prompt))
(defun crm-indicator (args) (defun crm-indicator (args)
"Work with ARGS in `completing-read-multiple`."
(cons (format "[CRM%s] %s" (cons (format "[CRM%s] %s"
(replace-regexp-in-string (replace-regexp-in-string
"\\`\\[.*?]\\*\\|\\[.*?]\\*\\'" "" "\\`\\[.*?]\\*\\|\\[.*?]\\*\\'" ""

View file

@ -4,16 +4,21 @@
;; Use flycheck checks with flymake. ;; Use flycheck checks with flymake.
(use-package flymake-flycheck :ensure t :defer t :config (use-package flymake-flycheck :ensure t :defer t :config
(setq-default (setq-default
flycheck-disabled-checkers flycheck-disabled-checkers
(append (default-value 'flycheck-disabled-checkers) (append (default-value 'flycheck-disabled-checkers)
'(emacs-lisp emacs-lisp-checkdoc '(emacs-lisp emacs-lisp-checkdoc emacs-lisp-package sh-shellcheck))))
emacs-lisp-package sh-shellcheck))))
(declare-function flymake--project-diagnostics-buffer 'flymake) (eval-when-compile
(declare-function flymake--diagnostics-buffer-name 'flymake) (declare-function flymake--project-diagnostics-buffer 'flymake)
(declare-function flymake-project-diagnostics-mode 'flymake) (declare-function flymake--diagnostics-buffer-name 'flymake)
(declare-function flymake-diagnostics-buffer-mode 'flymake) (declare-function flymake-project-diagnostics-mode 'flymake)
(declare-function flymake-diagnostics-buffer-mode 'flymake)
(declare-function cape-capf-super 'cape)
(declare-function cape-dabbrev 'cape)
(declare-function cape-file 'cape)
(declare-function cape-keyword 'cape)
(declare-function yasnippet-capf 'yasnippet-capf))
(use-package el-patch :ensure t :defer t (use-package el-patch :ensure t :defer t
:config :config
@ -51,10 +56,13 @@
(display-buffer (current-buffer)) (display-buffer (current-buffer))
(revert-buffer))))) (revert-buffer)))))
(el-patch-feature 'magit-commit) (el-patch-feature 'git-commit)
(with-eval-after-load 'magit-commit (with-eval-after-load 'git-commit
;; Reverts the contents of this commit:
;; https://github.com/magit/magit/commit/2366db4b3b792fbd191c1d653014bfc6343b270c
(el-patch-defun git-commit-setup-capf () (el-patch-defun git-commit-setup-capf ()
"Set completion-at-point-functions to be actually useful." "Set completion-at-point-functions to use cape completions in
`magit-commit' screens."
(setq-local completion-at-point-functions (setq-local completion-at-point-functions
(list (cape-capf-super #'cape-dabbrev #'yasnippet-capf) (list (cape-capf-super #'cape-dabbrev #'yasnippet-capf)
#'cape-file #'cape-file

View file

@ -1,8 +1,20 @@
;;; pkg/transient -- summary -*- lexical-binding: t; -*- ;;; icejam-transient -- summary -*- lexical-binding: t; -*-
;;; Commentary: ;;; Commentary:
;;; Global Transient definitions. ;;; Global Transient definitions.
;;; Code: ;;; Code:
(eval-when-compile (defvar icejam-keys-mode-map)) (eval-when-compile
(defvar icejam-keys-mode-map)
(defvar icejam-project-menu)
(defvar icejam-code-menu)
(defvar icejam-buffer-menu)
(defvar icejam-elpaca-menu)
(defvar icejam-language-menu)
(defvar icejam-command-palette)
(declare-function transient-define-prefix 'transient)
(declare-function icejam-project-menu 'icejam-transient)
(declare-function icejam-code-menu 'icejam-transient)
(declare-function icejam-buffer-menu 'icejam-transient)
(declare-function icejam-command-palette 'icejam-transient))
(use-package transient :ensure (:wait t)) (use-package transient :ensure (:wait t))

View file

@ -1,4 +1,4 @@
;;; icejam-treesitter.el --- summary ;;; icejam-treesitter.el --- summary -*- lexical-binding: t; -*-
;; Author: Maciej Szlosarczyk ;; Author: Maciej Szlosarczyk
;; Maintainer: Maciej Szlosarczyk ;; Maintainer: Maciej Szlosarczyk

View file

@ -4,6 +4,9 @@
(use-package dhall-mode :ensure t :defer t) (use-package dhall-mode :ensure t :defer t)
(eval-when-compile
(declare-function icejam-set-eglot-capfs 'icejam-complete-at-point))
(defun icejam-lang-activate-dhall-mode () (defun icejam-lang-activate-dhall-mode ()
"Reconfigure dhall mode for your own purposes." "Reconfigure dhall mode for your own purposes."
(eglot-ensure) (eglot-ensure)

View file

@ -9,9 +9,10 @@
;; Gleam language support ;; Gleam language support
;;; Code: ;;; Code:
(declare-function column-enforce-n 'column-enforce-mode (number)) (eval-when-compile
(declare-function icejam-set-indent 'icejam-prog-mode) (declare-function column-enforce-n 'column-enforce-mode (number))
(declare-function icejam-set-eglot-capfs 'icejam-complete-at-point) (declare-function icejam-set-indent 'icejam-prog-mode)
(declare-function icejam-set-eglot-capfs 'icejam-complete-at-point))
(use-package gleam-ts-mode :defer t :ensure t (use-package gleam-ts-mode :defer t :ensure t
:mode (rx ".gleam" eos)) :mode (rx ".gleam" eos))

View file

@ -1,4 +1,4 @@
;;; php.el --- summary -*- lexical-binding: t; -*- ;;; icejam-lang-php.el --- summary -*- lexical-binding: t; -*-
;; Author: Maciej Szlosarczyk ;; Author: Maciej Szlosarczyk
;; Maintainer: Maciej Szlosarczyk ;; Maintainer: Maciej Szlosarczyk
@ -9,14 +9,17 @@
;; php related settings ;; php related settings
;;; Code: ;;; Code:
(declare-function column-enforce-n 'column-enforce-mode (number)) (eval-when-compile
(declare-function icejam-set-indent 'icejam-prog-mode) (defvar icejam-language-transient-alist)
(declare-function icejam-set-eglot-capfs 'icejam-complete-at-point) (defvar icejam-php-lang-menu)
(eval-when-compile (defvar icejam-language-transient-alist)) (declare-function column-enforce-n 'column-enforce-mode (number))
(declare-function icejam-set-indent 'icejam-prog-mode)
(declare-function icejam-set-eglot-capfs 'icejam-complete-at-point)
(declare-function transient-define-prefix 'transient))
(use-package php-mode :ensure t :defer t) (use-package php-mode :ensure t :defer t)
(transient-define-prefix icejam-lang-php-context-menu () (transient-define-prefix icejam-php-lang-menu ()
"PHP Buffer Commands." "PHP Buffer Commands."
["" [""
["LSP" ["LSP"
@ -29,18 +32,18 @@
["" [""
("q" "Quit" keyboard-quit)]) ("q" "Quit" keyboard-quit)])
(add-to-list
'icejam-language-transient-alist '(php-mode . icejam-php-lang-menu))
(defun icejam-lang-activate-php-mode () (defun icejam-activate-php-mode ()
"All things php." "All things php."
(icejam-set-indent 4) (icejam-set-indent 4)
(column-enforce-n 80) (column-enforce-n 80)
(keymap-set php-mode-map "C-c l" #'icejam-lang-php-context-menu)
;; Capf override ;; Capf override
(icejam-set-eglot-capfs)) (icejam-set-eglot-capfs))
(add-hook 'php-mode-hook 'icejam-lang-activate-php-mode) (add-hook 'php-mode-hook 'icejam-activate-php-mode)
(provide 'icejam-lang-php) (provide 'icejam-lang-php)
;;; icejam-lang-php.el ends here ;;; icejam-lang-php.el ends here