added TODO to litorgy-ref.el

litorgy/litorgy-ref.el

@@ -102,6 +102,8 @@ return nil."
         (find-file (match-string 1 ref))
         (setf ref (match-string 2 ref)))
       (goto-char (point-min))
+      ;; TODO This should explicitly look for #+resname: lines before
+      ;; looking for #+srcname: lines to avoid re-calculating code
       (unless (let ((regexp (concat "^#\\+\\(TBL\\|SRC\\|RES\\)NAME:[ \t]*"
                                     (regexp-quote ref) "[ \t]*$")))
                 (or (re-search-forward regexp nil t)