embark : need to check if project first

elisp/um.el

@@ -126,6 +126,7 @@ Since journal/ is the origin and other projects shadow it.
    ;; NOTE: Recurse down into current project directories.
    ;; project-find-file does it fine, just don't want interactive
    ;; completing-read call.
+   (when (project-current)
      (let ((result) (tap (thing-at-point 'filename t)))
        ;; TODO: this is procedural thinking and not lisp-like:
        (cl-loop for file in
@@ -135,7 +136,7 @@ Since journal/ is the origin and other projects shadow it.
                 if result
                 ;; see `embark-target-finders':
                 return (cons 'file file)
-              ))
+                )))
 
    ;; all other projects
    (let ((result))