ld/avy
1
0
Fork 0
mirror of https://github.com/abo-abo/avy.git synced 2025-10-13 13:33:03 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fix two byte-compiler warnings

Browse Source 
Fixes #336
This commit is contained in:
Stefan Kangas 2022-01-01 04:21:46 +01:00 committed by Oleh Krehel
parent 6b53033883
commit ba5f035be3
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
avy.el
View File

@ -494,8 +494,8 @@ KEYS is the path from the root of `avy-tree' to LEAF."
"Store the current incomplete path during `avy-read'.") "Store the current incomplete path during `avy-read'.")
(defun avy-mouse-event-window (char) (defun avy-mouse-event-window (char)
"If CHAR is a mouse event, return the window of the event if any or the selected window. "Return the window of mouse event CHAR if any or the selected window.
Return nil if not a mouse event." Return nil if CHAR is not a mouse event."
(when (mouse-event-p char) (when (mouse-event-p char)
(cond ((windowp (posn-window (event-start char))) (cond ((windowp (posn-window (event-start char)))
(posn-window (event-start char))) (posn-window (event-start char)))
@ -1605,7 +1605,8 @@ Which one depends on variable `subword-mode'."
(defvar visual-line-mode) (defvar visual-line-mode)
(defcustom avy-indent-line-overlay nil (defcustom avy-indent-line-overlay nil
"When non-nil, `avy-goto-line' will display the line overlay next to the first non-whitespace character of each line." "When non-nil, display line overlay next to the first non-whitespace character.
This affects `avy-goto-line'."
:type 'boolean) :type 'boolean)
(defun avy--line-cands (&optional arg beg end bottom-up) (defun avy--line-cands (&optional arg beg end bottom-up)