mirror of
https://github.com/tanrax/lirve.el.git
synced 2024-11-14 09:25:41 +01:00
Fix set translation
This commit is contained in:
parent
cf70d4b683
commit
54e6b8429a
4
lirve.el
4
lirve.el
@ -30,7 +30,7 @@
|
||||
(defvar lirve--verb-to-learn-simple-past nil)
|
||||
(defvar lirve--verb-to-learn-past-participle nil)
|
||||
(defvar lirve--translation "")
|
||||
(defvar lirve--set-translation) ;; Set the translation language
|
||||
(defvar lirve--set-translation nil) ;; Set the translation language
|
||||
(defvar lirve--emoji-valid "✅")
|
||||
(defvar lirve--emoji-error "👎")
|
||||
(defvar lirve--widget-title nil)
|
||||
@ -187,7 +187,7 @@ Argument INFINITIVE verb to remove."
|
||||
|
||||
(defun lirve--show-translation ()
|
||||
"Show translation if `lirve--show-translation' is t."
|
||||
(when (not (null lirve--translation))
|
||||
(when lirve--set-translation
|
||||
(widget-value-set lirve--widget-item-verb (concat (lirve--format-value-infinitive) " 🇪🇸 " lirve--translation))))
|
||||
|
||||
(defun lirve--toggle-layout-finish ()
|
||||
|
Loading…
Reference in New Issue
Block a user