From e4b41df44abad660f3bbbcf28abcd5838068c14b Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Wed, 1 Nov 2023 03:14:05 +0100
Subject: Fix API for each-string.

---
 module/text/numbers/sv.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'module/text/numbers')

diff --git a/module/text/numbers/sv.scm b/module/text/numbers/sv.scm
index 317a0fa4..5d6e8952 100644
--- a/module/text/numbers/sv.scm
+++ b/module/text/numbers/sv.scm
@@ -181,7 +181,7 @@
 ;; (each-string 2) ; => "varannan"
 ;; (each-string 3) ; => "var tredje"
 ;; (each-string 3 #t) ; => "vart tredje"
-(define* (each-string count optional: neutrum)
+(define* (each-string count key: neutrum allow-other-keys:)
   (string-flatten
    (cons
     "var"
-- 
cgit v1.2.3