From 3674d11cd2793240458d413f956f8401269ccc57 Mon Sep 17 00:00:00 2001 From: Lucien Cartier-Tilet Date: Sat, 14 Sep 2024 14:51:56 +0200 Subject: [PATCH] fix: verb declensions in correct order --- conlanging-eittlandic.el | 15 +++++++-------- 1 file changed, 7 insertions(+), 8 deletions(-) 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.