fix: lint

This commit is contained in:
Pavel Korytov 2022-08-24 15:35:13 +03:00
parent c9481d7b3a
commit 35badb3e7f

View file

@ -518,7 +518,6 @@ HTML is a string."
for antonym in (dom-non-text-children for antonym in (dom-non-text-children
(dom-by-class (car (dom-by-class child "antonyms-wrapper")) (dom-by-class (car (dom-by-class child "antonyms-wrapper"))
"word-box")) "word-box"))
for a = (car (dom-by-tag antonym 'a))
for text = (string-trim (dom-texts antonym)) for text = (string-trim (dom-texts antonym))
unless (string-match-p (rx "...") text) unless (string-match-p (rx "...") text)
collect collect
@ -756,7 +755,6 @@ source languages."
INPUT is the input string. DATA is a list as defined in INPUT is the input string. DATA is a list as defined in
`reverso--get-synomyms'." `reverso--get-synomyms'."
(setq-local reverso--input input) (setq-local reverso--input input)
(setq my/test data)
(dolist (datum data) (dolist (datum data)
(when (alist-get :kind datum) (when (alist-get :kind datum)
(insert (propertize (insert (propertize
@ -1010,10 +1008,7 @@ OBJ is an instance of `reverso--transient-language'."
(oref obj value)) (oref obj value))
((and (symbol-value (reverso--get-language-variable obj))) ((and (symbol-value (reverso--get-language-variable obj)))
(symbol-value (reverso--get-language-variable obj))) (symbol-value (reverso--get-language-variable obj)))
(t (car (reverso--get-available-languages (t (car (reverso--get-available-languages obj))))))
obj
(oref obj target-languages)
(oref obj is-target)))))))
(set (reverso--get-language-variable obj) value) (set (reverso--get-language-variable obj) value)
(oset obj value value))) (oset obj value value)))