Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Fix DDSKK shim #577

Merged
merged 1 commit into from
Mar 21, 2024
Merged

Fix DDSKK shim #577

Changes from all commits
Commits
Show all changes
1 commit
Select commit
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion meow-shims.el
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -119,8 +119,8 @@
(advice-add 'diff-hl-show-hunk-posframe :before 'meow--switch-to-motion)
(advice-add 'diff-hl-show-hunk-hide :after 'meow--switch-to-normal))
(advice-remove diff-hl-show-hunk-inline-popup 'meow--switch-to-motion)
(advice-remove diff-hl-show-hunk-posframe 'meow--switch-to-motion)

Check warning on line 122 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (26.3, true) 

reference to free variable ‘diff-hl-show-hunk-inline-popup’

Check warning on line 122 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (27.1, true) 

reference to free variable ‘diff-hl-show-hunk-inline-popup’

Check warning on line 122 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (28.2, true) 

reference to free variable ‘diff-hl-show-hunk-inline-popup’
(advice-remove diff-hl-show-hunk-hide 'meow--switch-to-normal)))

Check warning on line 123 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (26.3, true) 

reference to free variable ‘diff-hl-show-hunk-posframe’

Check warning on line 123 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (26.3, true) 

reference to free variable ‘diff-hl-show-hunk-hide’

Check warning on line 123 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (27.1, true) 

reference to free variable ‘diff-hl-show-hunk-posframe’

Check warning on line 123 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (27.1, true) 

reference to free variable ‘diff-hl-show-hunk-hide’

Check warning on line 123 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (28.2, true) 

reference to free variable ‘diff-hl-show-hunk-posframe’

Check warning on line 123 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (28.2, true) 

reference to free variable ‘diff-hl-show-hunk-hide’

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; wgrep
Expand Down Expand Up @@ -275,10 +275,10 @@
(defvar meow--which-key-setup nil)

(defun meow--which-key-describe-keymap ()
(if which-key-mode

Check warning on line 278 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (26.3, true) 

reference to free variable ‘which-key-mode’

Check warning on line 278 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (27.1, true) 

reference to free variable ‘which-key-mode’

Check warning on line 278 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (28.2, true) 

reference to free variable ‘which-key-mode’
(setq meow-keypad-describe-keymap-function
(lambda (keymap)
(which-key--create-buffer-and-show nil keymap nil (concat "Meow: " (meow--keypad-format-keys)))))

Check warning on line 281 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (28.2, true) 

the function ‘which-key--create-buffer-and-show’ is not known to be defined.
(setq meow-keypad-describe-keymap-function 'meow-describe-keymap)))

(defun meow--setup-which-key (enable)
Expand All @@ -292,7 +292,7 @@

(defvar meow--input-method-setup nil)

(defun meow--input-method-advice (fnc key)

Check warning on line 295 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (28.2, true) 

 docstring wider than 80 characters
"Intended to be advice for quail-input-method. Only use the input method in insert mode."
(funcall (if (and (boundp 'meow-mode) meow-mode (not (meow-insert-mode-p))) #'list fnc) key))

Expand All @@ -307,15 +307,15 @@

(defvar meow--ddskk-setup nil)
(defun meow--ddskk-skk-previous-candidate-advice (fnc &optional arg)
(if (and (not (eq skk-henkan-mode 'active))

Check warning on line 310 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (26.3, true) 

reference to free variable ‘skk-henkan-mode’

Check warning on line 310 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (27.1, true) 

reference to free variable ‘skk-henkan-mode’

Check warning on line 310 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (28.2, true) 

reference to free variable ‘skk-henkan-mode’
(not (eq last-command 'skk-kakutei-henkan))
last-command-event
(eq last-command-event
(seq-first (car (where-is-internal
'meow-prev
meow-normal-state-keymap)))))

Check warning on line 316 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (26.3, true) 

‘previous-line’ is for interactive use only; use ‘forward-line’ with negative argument instead.

Check warning on line 316 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (27.1, true) 

‘previous-line’ is for interactive use only; use ‘forward-line’ with negative argument instead.

Check warning on line 316 in meow-shims.el

View workflow job for this annotation

GitHub Actions / check (28.2, true) 

‘previous-line’ is for interactive use only; use ‘forward-line’ with negative argument instead.
(previous-line)
(funcall func arg)))
(funcall fnc arg)))

(defun meow--setup-ddskk (enable)
(setq meow--ddskk-setup enable)
Expand Down Expand Up @@ -390,3 +390,3 @@

;;; meow-shims.el ends here
(provide 'meow-shims)
Loading