sqrtminusone/biome
1
0
Fork 0
mirror of https://github.com/SqrtMinusOne/biome.git synced 2025-12-10 14:35:13 +03:00
Code Issues Projects Releases Packages Wiki Activity Actions

ci: byte-compiler doesn't like cl-loop (x2)

Browse source
This commit is contained in:
Pavel Korytov 2023-07-22 23:41:51 +03:00
parent a04c76b029
commit 7bda9688e4
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
biome-query.el
View file

@ -716,7 +716,7 @@ exclude from the result."
(append
;; Unset forbidden keys
(cl-loop for name in names
for key-1 = (gethash name key-1s-by-name)
for key-1 = (gethash name keys-by-name)
if (or (null key-1)
(and
exclude key-1
@ -739,8 +739,8 @@ exclude from the result."
for name in names-to-update
for old-key = (gethash name keys-by-name)
for key-1 = (iter-next (gethash name iters))
if old-key do (puthash old-key (remove name (gethash old-key names-by-key-1)) names-by-key-1)
do (puthash key-1 (cons name (gethash key-1 names-by-key-1)) names-by-key-1)
if old-key do (puthash old-key (remove name (gethash old-key names-by-key)) names-by-key)
do (puthash key-1 (cons name (gethash key-1 names-by-key)) names-by-key)
do (puthash name key-1 keys-by-name)))
keys-by-name))