Fix missing parameter

src/btn.lisp

@@ -162,7 +162,7 @@ Example:
 
 Returns HTML for a flexbox div containing styled anchor tags as buttons."
   `(spinneret:with-html
-     (:div :class "btn-group" :role "group" :aria-label (t9n "btn-group")
+     (:div :class "btn-group" :role "group" :aria-label (t9n "btn-group" "en")
            ,@(loop for (label url) on buttons by #'cddr
                    collect `(btn (:color ,color :size "sm" :url ,url) ,label)))))
 

src/form.lisp

@@ -240,7 +240,7 @@ Example 2:
        (:select :class ,class-attr
          ,@(when (numberp multiple) (list :size multiple :multiple t))
          (:option :selected t
-                  (t9n "option-selected"))
+                  (t9n "option-selected" "en"))
          ,@(loop for item in body
                  collect
                  (let ((value-prop-str (build-str-value-prop item)))
@@ -288,7 +288,7 @@ Example usage:
                    :placeholder "Search"
                    :title "Search")
            (btn-outline-success (:type "submit")
-             (t9n "search")))))
+             (t9n "search" "en")))))
 
 ;;; TODO input groups
 
@@ -521,4 +521,4 @@ INTRO: Write some information related to the form. Could be a introduction."
                `((:input :type "hidden" :name "csrf-token" :value ,csrf-token)))
              ,@body
              (btn-primary (:type "submit")
-               (t9n "submit"))))))
+               (t9n "submit" "en"))))))

src/main.lisp

@@ -176,7 +176,7 @@ Example usage:
        (:div :class "skippy visually-hidden-focusable overflow-hidden"
              (:a :href "#main-content"
                  :class "d-inline-flex p-2 m-1"
-                 (t9n "skip-link")))
+                 (t9n "skip-link" "en")))
        ,@body
        (:div :class (if ,container
                         (concatenate 'string "container-" ,container)