sqrtminusone/reverso.el
1
0
Fork 0
mirror of https://github.com/SqrtMinusOne/reverso.el.git synced 2025-12-10 15:53:02 +03:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix: example format & error in switching languages

Browse source
This commit is contained in:
Pavel Korytov 2022-08-27 21:27:08 +03:00
parent 1476cdcb68
commit 0f09dd0f56
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
reverso.el
View file

@ -738,11 +738,11 @@ DATA is a list of alists with the following keys:
for source = (alist-get :source datum)
for target = (alist-get :target datum)
do (insert (propertize
(format (format "%%-%ds: " lang-length) lang-to-name)
(format (format "%%-%ds: " lang-length) lang-from-name)
'face 'reverso-keyword-face)
source "\n"
(propertize
(format (format "%%%ds: " lang-length) lang-from-name)
(format (format "%%%ds: " lang-length) lang-to-name)
'face 'reverso-keyword-face)
target "\n\n")))
@ -799,7 +799,7 @@ INPUT is the input string. DATA is a list as defined in
'face 'reverso-heading-face)
"\n")
(dolist (example (alist-get :examples datum))
(insert example "\n"))
(insert "- " example "\n"))
(insert "\n"))
(when (alist-get :antonyms datum)
(insert (propertize
@ -1240,7 +1240,7 @@ OBJ is an instance of `reverso--transient-language'."
OBJ is an instance of `reverso--transient-language'."
(let* ((choices (reverso--get-available-languages obj))
(current-idx (or (cl-position (oref obj value) choices) -1))
(current-idx (or (cl-position (transient-infix-value obj) choices) -1))
(next-idx (% (1+ current-idx) (length choices)))
(next-choice
(if (> (length choices) reverso-language-completing-read-threshold)