         (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)

  (let [ws (sd/ws-deref!)
        ids (q/get-ids-from-file-line-range ws
                                            file
                                            (or start-line line)
                                            line)]
    (if-not (empty? ids)
      (sd/ws-query* [:id ids])
