Flag not to split text file into lines

CHANGELOG.md

@@ -8,6 +8,7 @@ For a list of breaking changes, check [here](#breaking-changes).
 
 - Stable Clojure release 1.10.2
 - Remove redundant options from native-image building script 
+- Flag to search in whole files
 
 ## v2021.01.24
 

README.md

@@ -100,6 +100,7 @@ Supported options:
       --post-tags POST_TAGS                    A string that the highlighted text is wrapped in, use in conjunction with --pre-tags
       --excludes EXCLUDES                      A GLOB that filters out files that were matched with a GLOB
       --skip-binary-files                      If a file that is detected to be binary should be skipped. Available for Linux and MacOS only.
+      --[no-]split                             If a file (or STDIN) should be split by newline.
   -h, --help
 ```
 

src/lmgrep/cli.clj

@@ -62,6 +62,8 @@
    [nil "--excludes EXCLUDES" "A GLOB that filters out files that were matched with a GLOB"]
    [nil "--skip-binary-files" "If a file that is detected to be binary should be skipped. Available for Linux and MacOS only."
     :default false]
+   [nil "--[no-]split" "If a file (or STDIN) should be split by newline."
+    :default true]
    ;[nil "--slop SLOP" "How far can be words from each other"
    ; :parse-fn #(Integer/parseInt %)
    ; :default 0]

src/lmgrep/grep.clj

@@ -94,10 +94,14 @@
         highlighter-fn (lucene/highlighter dictionary)]
     (if files-pattern
       (doseq [path (fs/get-files files-pattern options)]
-        (with-open [rdr (io/reader path)]
-          (match-lines highlighter-fn path (line-seq rdr) options)))
+        (if (:split options)
+          (with-open [rdr (io/reader path)]
+            (match-lines highlighter-fn path (line-seq rdr) options))
+          (match-lines highlighter-fn path [(slurp path)] options)))
       (when (.ready ^Reader *in*)
-        (match-lines highlighter-fn nil (line-seq (BufferedReader. *in*)) options)))))
+        (if (:split options)
+          (match-lines highlighter-fn nil (line-seq (BufferedReader. *in*)) options)
+          (match-lines highlighter-fn nil [(str/trim (slurp *in*))] options))))))
 
 (comment
   (lmgrep.grep/grep "opt" "**.md" {:format :edn})