diff --git a/conlanging-eittlandic.el b/conlanging-eittlandic.el index f1300b0..af3b243 100644 --- a/conlanging-eittlandic.el +++ b/conlanging-eittlandic.el @@ -285,14 +285,13 @@ agrees with." | 2p | | %s | %s | %s | %s | | 3p | | %s | %s | %s | %s |" root root (concat root "ask") (concat root "and") (concat root "it") - ,@(let (accessor i) - (reverse (dolist (declension - '(indicative-present subjunctive-present past passive) - accessor) - (setq i 0) - (while (< i 6) - (push `(nth ,i ,declension) accessor) - (setq i (1+ i)))))))) + ,@(reverse + (let (accessor (i 0)) + (while (< i 6) + (dolist (declension '(indicative-present subjunctive-present past passive)) + (push `(nth ,i ,declension) accessor)) + (setq i (1+ i))) + accessor)))) (defun conlanging-eittlandic--make-passive-verb-declension (root strength underlying-vowel passive-consonant passive-vowel) "Create a verb declension for the passive mood.