   (:use [cljsearch.common])
   (:use [cljsearch.filetypes])
   (:use [cljsearch.fileutil])
-  (:use [cljsearch.searchresult])
-)
+  (:use [cljsearch.searchresult]))
 
 ; ref to contain the seq of SearchResult records
 (def search-results (ref []))

    (if (empty? errs)
      (do
        (search-dirs (get-search-dirs settings) settings)
        []
      )
      errs
    )
  )
)


                       line
                       linesbefore
                       linesafter)]
          (if (:firstmatch settings)
            [result]
            (concat [result] (search-multiline-string-for-pattern s m
