diff --git a/src/pattern/questionnaire.lisp b/src/pattern/questionnaire.lisp
index 12a2ed4..e1119a6 100644
--- a/src/pattern/questionnaire.lisp
+++ b/src/pattern/questionnaire.lisp
@@ -253,7 +253,7 @@ Returns multiple values:
   - The group name (GROUP)
   - The choices (CHOICES)"
   (let ((splitted-list (split-list-by-keyword question)))
-    (apply #'values (mapcar (lambda (x) (first (last x))) splitted-list))))
+    (apply #'values (mapcar (lambda (x) (cadr x)) splitted-list))))
 
 (defmacro questionnaire (action &body body)
   "This macro generates an HTML form composed of multiple questions, each rendered using the `question' macro.