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

Add debug declarations

Browse Source
This commit is contained in:
Oleh Krehel 2015-05-11 14:39:01 +02:00
parent dfbf0e21a6
commit ca69b1f5a0
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
avy.el
View File

@ -231,7 +231,8 @@ multiple DISPLAY-FN invokations."
;;** Rest
(defmacro avy-dowindows (flip &rest body)
"Depending on FLIP and `avy-all-windows' run BODY in each or selected window."
(declare (indent 1))
(declare (indent 1)
(debug (form body)))
`(let ((avy-all-windows (if ,flip
(not avy-all-windows)
avy-all-windows)))
@ -244,7 +245,8 @@ multiple DISPLAY-FN invokations."
(defmacro avy--with-avy-keys (command &rest body)
"Set `avy-keys' according to COMMAND and execute BODY."
(declare (indent 1))
(declare (indent 1)
(debug (form body)))
`(let ((avy-keys (or (cdr (assq ',command avy-keys-alist))
avy-keys))
(avy-style (or (cdr (assq ',command avy-styles-alist))