diff --git a/harness/context.org b/harness/context.org
index bd39c4a..907dc40 100644
--- a/harness/context.org
+++ b/harness/context.org
@@ -34,7 +34,7 @@ The *Context API* (Peripheral Vision) provides the opencortex with the ability t
 #+begin_src lisp
 (defun context-get-active-projects ()
   "Returns headlines tagged as 'project' that are not yet marked DONE."
-  (remove-if (lambda (obj) (equal (getf (org-object-attributes obj) :TODO-STATE) "DONE)
+  (remove-if (lambda (obj) (equal (getf (org-object-attributes obj) :TODO-STATE) "DONE"))
              (context-query-store :tag "project" :type :HEADLINE)))
 #+end_src