marcuskammer/dev.metalisp.sbt
1
1
Fork 0
Code Issues 1 Pull requests Projects 1 Releases Packages Wiki Activity Actions

Fix t9n naming issues

Browse source
This commit is contained in:
Marcus Kammer 2024-08-06 08:59:23 +02:00
parent 43ce0d773b
commit a49dd28f65
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/translate.lisp
View file

@ -71,9 +71,9 @@
(loop for (lang translation) on translations by #'cddr (loop for (lang translation) on translations by #'cddr
do (setf (gethash lang (gethash key *t9n*)) translation))) do (setf (gethash lang (gethash key *t9n*)) translation)))
(when (zerop (hash-table-count *l10n*)) (when (zerop (hash-table-count *t9n*))
(dolist (entry *t9n-table*) (dolist (entry *t9n-table*)
(add-translation (first entry) (first (rest entry))))) (add-t9n (first entry) (first (rest entry)))))
(defun find-t9n (key lang dict) (defun find-t9n (key lang dict)
"Finds the localized string for a given key and language." "Finds the localized string for a given key and language."