From 0f09dd0f566dcb46a73b154c62737879ac0bd5e1 Mon Sep 17 00:00:00 2001 From: SqrtMinusOne Date: Sat, 27 Aug 2022 21:27:08 +0300 Subject: [PATCH] fix: example format & error in switching languages --- reverso.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/reverso.el b/reverso.el index e5e945e..19305a1 100644 --- a/reverso.el +++ b/reverso.el @@ -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)