fix(tazjin/russian): Minor Elisp fixes

Change-Id: I759182ccb49d7a72ca8a031c829608c9eee70277
This commit is contained in:
Vincent Ambo 2021-12-13 16:36:19 +03:00
parent 53f8a04b33
commit 396e3a0d68
2 changed files with 4 additions and 4 deletions

View file

@ -21,9 +21,9 @@
"Merge two Russian word definitions together. If no previous
definition exists, only the new one will be returned."
(if (not previous) new
(assert (equal (russian-word-word previous)
(russian-word-word new))
"different words passed into merge function")
(cl-assert (equal (russian-word-word previous)
(russian-word-word new))
"different words passed into merge function")
(make-russian-word :word (russian-word-word previous)
:translations (-concat (russian-word-translations previous)
(russian-word-translations new))

View file

@ -4,7 +4,7 @@
;; translations :: '(translation ...)
;; roots :: '(root ...)
(require 'russian-defs)
(require 'russian)
(define-russian-words
;; 1-50