Bug fix: variable initial value couldn't be one character
[sheep] / src / main / var.lisp
index a3910f2418dc537386517558f1c95a6a3469faea..93ef25e3657e6c5889b9e4ece1c51a6070005479 100644 (file)
@@ -33,7 +33,7 @@
   (cond
    ((and next-optional (not next-line)) (list ""))
    ((and (string= "" next-line) (not (more))) (fire-error "Can't end with empty line"))
-   ((cl-ppcre:scan "^  [^ ].+" next-line)
+   ((cl-ppcre:scan "^  [^ ]+" next-line)
     (let
      ((rest-of-freeform (freeform->paragraphs next next-optional)))
      (cons