diff --git a/lisp/editing/my-eglot.el b/lisp/editing/my-eglot.el
index 0f6bb748..f7c0816f 100644
--- a/lisp/editing/my-eglot.el
+++ b/lisp/editing/my-eglot.el
@@ -34,7 +34,7 @@ Rename variable which is symbol ID"
                  :inlayHintProvider))
             (eglot-events-buffer-config . 0)
             (eglot-auto-display-help-buffer . nil))
-  :defun eglot-inlay-hints-mode
+  :defun eglot-inlay-hints-mode eglot-code-actions
   :bind ((:eglot-mode-map
           ("C-c lr" . 'eglot-rename)
           ("<f6>"   . 'eglot-rename)
diff --git a/lisp/editing/my-flymake.el b/lisp/editing/my-flymake.el
index 56b39a21..2cfda9ac 100644
--- a/lisp/editing/my-flymake.el
+++ b/lisp/editing/my-flymake.el
@@ -34,6 +34,7 @@ Use object DIAG which is captured with one of `embark-target-finders'"
 ;; see `my-flycheck' for simple showcases
 (leaf embark
   :after flymake
+  :defun flymake--diag-text
   :config
   (advice-add
    'embark-target-flymake-at-point
diff --git a/lisp/editing/my-meow.el b/lisp/editing/my-meow.el
index 3d6bad87..d7dc5ae5 100644
--- a/lisp/editing/my-meow.el
+++ b/lisp/editing/my-meow.el
@@ -151,7 +151,6 @@
      '("y" . meow-save)
      '("Y" . meow-sync-grab)
      '("z" . embrace-commander)
-     '("Z" . meow-comment)  ; useless with me, M-; is ok
      '("'" . repeat)
      '("%" . meow-query-replace-regexp)
      ;; my own modal state
diff --git a/lisp/editing/my-yas.el b/lisp/editing/my-yas.el
index da622421..7a93ae9d 100644
--- a/lisp/editing/my-yas.el
+++ b/lisp/editing/my-yas.el
@@ -31,6 +31,7 @@
   ;; :global-minor-mode yas-global-mode
   :hook ((prog-mode-hook . yas-minor-mode)
          (text-mode-hook . yas-minor-mode))
+  :defvar yas-snippet-dirs
   :custom (yas-wrap-around-region . t)
   :config
   (setq yas-snippet-dirs (list my-snippets-dir))
@@ -42,6 +43,7 @@
 (leaf cape
   :defun cape--table-with-properties cape--bounds cape-interactive
   :after cape yasnippet corfu
+  :defun my-yas-capf
   :config
   (defvar my-yas--capf-properties
     (list :annotation-function (lambda (_) " Snippet ")
diff --git a/lisp/env/my-project.el b/lisp/env/my-project.el
index 3a1be44c..50a5cc3b 100644
--- a/lisp/env/my-project.el
+++ b/lisp/env/my-project.el
@@ -16,15 +16,15 @@
 (leaf project
   :hook (after-init-hook . my-bind--project)
   :bind (:project-prefix-map
-         ;; at start `project-dired' is bound with C-x p D, but `dired-jump'
-         ;; (open `dired' in the current directory) is bound with C-x C-j, I
-         ;; love the following convention:
+         ;; at start `project-dired' is bound with C-x p D, but
+         ;; `dired-jump' (open `dired' in the current directory) is
+         ;; bound with C-x C-j, I love the following convention:
 
          ;; C-x C-f - find a file in the current directory,
          ;; C-x p f - find a file in the current project
 
-         ;; C-x C-b - switch to a opened buffer (or also bookmark or register,
-         ;; because `consult')
+         ;; C-x C-b - switch to a opened buffer (or also bookmark or
+         ;;   register,   because `consult')
          ;; C-x p b - switch to a project buffer,
 
          ;; so I also do it with:
@@ -36,6 +36,7 @@
          ("%" . project-query-replace-regexp))
   :config (defun my-bind--project ()
             (global-set-key (kbd "C-c p") project-prefix-map))
+  :defvar project-switch-commands
   :config
   (remove-from-list! project-switch-commands
                      ;; remove `vc-dir' from the commands which will be shown
diff --git a/lisp/package-management/my-leaf.el b/lisp/package-management/my-leaf.el
index 12a932d7..73ef96c6 100644
--- a/lisp/package-management/my-leaf.el
+++ b/lisp/package-management/my-leaf.el
@@ -440,12 +440,13 @@
                    (car leaf--value))
                 ,@leaf--body))
             :pre-setq
-            `(,@(mapcar
-                 (lambda
-                   (elm)
-                   `(setq ,(car elm)
-                          ,(cdr elm)))
-                 leaf--value)
+            `((with-no-warnings
+                ,@(mapcar
+                   (lambda
+                     (elm)
+                     `(setq ,(car elm)
+                            ,(cdr elm)))
+                   leaf--value))
               ,@leaf--body)
             :pre-setf
             `(,@(mapcar