diff --git a/org-generate.org b/org-generate.org
index 532457e..2947bcb 100644
--- a/org-generate.org
+++ b/org-generate.org
@@ -22,12 +22,12 @@ template subtree.
 written in lower case. The code looks for these case sensitively.
 
 * aoc
-
 ** common-lisp
 :PROPERTIES:
 :org-generate-root: ~/quicklisp/local-projects/aoc
 :org-generate-variable: year day
-:END
+:END:
+
 *** src/
 **** {{year}}/
 ***** day{{day}}.lisp
@@ -50,12 +50,12 @@ written in lower case. The code looks for these case sensitively.
 
 
   (defun parse-input (lines)
-    (blocks-to-fs (mapcar #'parse-line lines)))
+    (mapcar #'parse-line lines))
 
   (defparameter input-text (first (test-input 2024 {{day}})))
   (defparameter input-data (parse-input input-text))
 
-  (defparameter sample-text "")
+  (defparameter sample-text (aoc:split-lines ""))
   (defparameter sample-data 
   	      (parse-input sample-text))