         (cond
           (nil? frm) nil
           (<= (:line m) line (:end-line m)) frm
+          (> (:line m) line) nil
           :else (recur rdr-iter))))))
 
 (defn get-meta-at-pos-in-source

            [com.billpiel.sayid.util.other :as util]
            [clojure.tools.namespace.find :as ns-find]))

(defn send-status-done
  [msg]
  (t/send (:transport msg)

               (update-in [:path] str)
               (update-in [:header] #(when % 1)))])
        line-meta))

;; ======================

