From c09f83162ad13445c656e9c06d09fc2f29cccf5f Mon Sep 17 00:00:00 2001 From: Frank Duncan Date: Sat, 22 Apr 2017 16:26:00 -0500 Subject: [PATCH] Bug fix: variable initial value couldn't be one character --- src/main/var.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/main/var.lisp b/src/main/var.lisp index a3910f2..93ef25e 100644 --- a/src/main/var.lisp +++ b/src/main/var.lisp @@ -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 -- 2.25.1