diff --git a/harness/skills.org b/harness/skills.org index 2811058..d6d567a 100644 --- a/harness/skills.org +++ b/harness/skills.org @@ -179,7 +179,9 @@ The ~opencortex~ Skill Engine enables **Late-Binding Intelligence**, allowing th ((uiop:string-prefix-p "#+end_src" clean-line) (setf in-lisp-block nil) (setf collect-this-block nil)) ((and in-lisp-block collect-this-block) - (unless (or (uiop:string-prefix-p ":" clean-line)) + (unless (or (uiop:string-prefix-p ":PROPERTIES:" (string-upcase clean-line)) + (uiop:string-prefix-p ":END:" (string-upcase clean-line)) + (uiop:string-prefix-p ":ID:" (string-upcase clean-line))) (setf lisp-code (concatenate 'string lisp-code line (string #\Newline)))))))) (if (= (length lisp-code) 0) (setf (skill-entry-status entry) :ready)