From c1e19d8bbea42c4560315bfbbba77b912c63d0fa Mon Sep 17 00:00:00 2001 From: bard_simpson Date: Mon, 17 Jun 2024 19:48:55 +0300 Subject: [PATCH] fix byte-compile remarks part 107 --- lisp/editing/my-eldoc.el | 4 +++- lisp/editing/my-yas.el | 13 +++++++++---- lisp/env/my-git.el | 1 + lisp/env/my-persp.el | 5 +++-- lisp/env/my-run-command.el | 6 +++--- 5 files changed, 19 insertions(+), 10 deletions(-) diff --git a/lisp/editing/my-eldoc.el b/lisp/editing/my-eldoc.el index 6dc7b91a..747a4e00 100644 --- a/lisp/editing/my-eldoc.el +++ b/lisp/editing/my-eldoc.el @@ -88,9 +88,11 @@ :when (display-graphic-p) :commands (eldoc-box--eldoc-message-function eldoc-box--eldoc-display-function) - :defun eldoc-box--get-frame :bind (("C-h C-k" . eldoc-box-quit-frame) ("C-h C-v" . my-scroll-eldoc-box-frame)) + :defvar (eldoc-box--buffer + eldoc-box-clear-with-C-g + eldoc-box-max-pixel-width) :custom (;; (eldoc-box-fringe-use-same-bg . nil) (eldoc-box-cleanup-interval . 30) (eldoc-box-clear-with-C-g . t)) diff --git a/lisp/editing/my-yas.el b/lisp/editing/my-yas.el index 7a93ae9d..569fd631 100644 --- a/lisp/editing/my-yas.el +++ b/lisp/editing/my-yas.el @@ -22,10 +22,15 @@ (leaf yasnippet :ensure (yasnippet :repo "joaotavora/yasnippet") - :defun (yas-reload-all - yas--table-hash + :defun (yas--fetch yas--filter-templates-by-condition - yas--namehash-templates-alist) + yas--get-snippet-tables + yas--namehash-templates-alist + yas--table-hash + yas--template-content + yas-active-keys + yas-expand + yas-reload-all) :bind ("C-=" . yas-insert-snippet) ;; don't use `yas-global-mode', prefer local minor modes ;; :global-minor-mode yas-global-mode @@ -41,7 +46,7 @@ ;; a completion for snippets with `cape' (capf) (leaf cape - :defun cape--table-with-properties cape--bounds cape-interactive + :defun cape--properties-table cape--bounds cape-interactive :after cape yasnippet corfu :defun my-yas-capf :config diff --git a/lisp/env/my-git.el b/lisp/env/my-git.el index dd426a66..5bbf9bc1 100644 --- a/lisp/env/my-git.el +++ b/lisp/env/my-git.el @@ -17,6 +17,7 @@ :host github) :bind (:magit-mode-map ("D" . magit-file-delete)) + :defvar project-switch-commands :custom ((magit-refresh-status-buffer . t) (magit-disabled-section-inserters . '(magit-insert-diff-filter-header diff --git a/lisp/env/my-persp.el b/lisp/env/my-persp.el index b9c4cd08..e0553b00 100644 --- a/lisp/env/my-persp.el +++ b/lisp/env/my-persp.el @@ -11,13 +11,12 @@ (require 'dash) (require 'my-leaf) -(defvar persp-key-map) (leaf persp-mode :ensure t :defun persp-mode persp-set-keymap-prefix :config (persp-mode +1) ;; change prefix from the default "C-c p" to "C-c ," - :defvar persp-mode-map + :defvar persp-mode-map persp-key-map persp-keymap-prefix :custom `((persp-keymap-prefix . ,(kbd "C-c ,")) ;; if `persp-auto-resume-time' <= 0, then `persp-mode' don't load all auto-saved ;; perspectives at startup, if you need in them, do `persp-load-state-from-file' @@ -51,6 +50,7 @@ has a number 1, not 0" (cons 'progn) eval)) +(defvar persp-key-map) (with-eval-after-load 'persp-mode (define-key mode-specific-map "," persp-key-map)) @@ -60,6 +60,7 @@ has a number 1, not 0" consult--customize-put my-persp-buffer-names persp-buffer-list-restricted) + :defvar consult-buffer-sources :config (consult--customize-put '(consult--source-buffer) :default nil) (consult--customize-put '(consult--source-buffer) :hidden nil) diff --git a/lisp/env/my-run-command.el b/lisp/env/my-run-command.el index ed67c44e..092b279c 100644 --- a/lisp/env/my-run-command.el +++ b/lisp/env/my-run-command.el @@ -53,6 +53,9 @@ (define-key compilation-mode-map "t" #'my-compilation-toggle-hide-details)) +(defvar-local my-compilation-hide-details-p nil + "Variable is non-nil if details of `compile' buffer was hiden.") + (defun my-compilation-toggle-hide-details () "Hide or show details inside of `compile' buffer." (interactive) @@ -61,9 +64,6 @@ (my-compilation-hide-details)) (setq-local my-compilation-hide-details-p (not my-compilation-hide-details-p))) -(defvar-local my-compilation-hide-details-p nil - "Variable is non-nil if details of `compile' buffer was hiden.") - (defun my-compilation-hide-details () "Hide details like time at compile start inside `compile' buffer." (interactive)